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PREFACE 



HOW TO USE THIS BOOK 

This publication explains for the Time 
Sharing System user the instructions which 
direct the Assembler language program in 
converting source statements into object 
language. It also contains the syntactical 
rules you must follow in coding your 
program in Assembler language* Only 
assembler instructions are fully described 
in this book; the functions of 
machine-executable instructions (such as 
Load, Add Register, or Move Characterl are 
explained in Principles of Operation , 
GA22-6821. 

Since some of the terms used in this 
book are defined in earlier sections of the 
book, we suggest an initial read-through? 
after that, you will probably continue to 
rely on this publication as a reference 
source. This book is not a primer, and 
other Time Sharing System publications are 
directed more towards illustrating specific 
possibilities? this publication serves as 
the definitive grammar of the Assembler 
language. 

The reader is presumed to have some 
knowledge of programming concepts as well 
as some understanding of machine opera- 
tions, particularly storage addressing, 
data formats, and machine instruction 
formats and functions. 



THIS BOOK CONTAINS 

• The rules of the language: statement 
format and syntax, assembler 
limitations. 

• Assembler (not machine-executable) 
instructions, such as DC, DS, ORG, 
CSECT, ENTRY. How and when to use 

them. 



The meaning of words defined specially 
for Assembler language, such as "term", 
•literal", "relocatable expression - , 
•symbolic parameter* . 



• Macro language. Bow to use it and the 
rules for writing a macro definition. 



• Appendixes of Assembler language 
characteristics • 



SEE THESE BOOKS FOR 

• A description of machine-executable 
instructions. Standard instructions 
may be found in the IBM Principles 
of Operation , GA22-6821. 



• How to use TSS to assemble a program 
you've written. The Time Sharing 
System Assembler Programmer's Guide , 
GC2S-2032, tells how and has several 
examples. 

• System macro instructions available to 
you. These are described fully in Time 
Sharing System Assembler User Macro 
Instructions , GC28-200«*. 

• Special macro~writing techniques. 
Certain macro techniques that you may 
find useful are described in the System 
Programmer's Guide . GC28-2008. 

Time Sharing System Concepts and 
Facilities , GC28-2003, is recommended as 
preliminary reading. The TSS Quick Guide . 
GX28-6U00, provides a pocket-size summary 
of some of the tables in this book. 
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SECTION 1: INTRODUCTION 



Computer programs may be expressed in 
machine language (language directly inter- 
preted by the computer) or in a symbolic 
language, which is more meaningful to the 
programmer. The symbolic language must be 
translated into machine language by an 
associated processing program before the 
computer can execute the program. 

Among symbolic programming languages f 
assembler languages are closest to machine 
language in form and content. 

The assembler language discussed in this 
manual is a symbolic programming language 
for the IBM Time Sharing System (TSS) . 
it enables the programmer to use all 
machine functions as if he were coding 
in machine language. 

The assembler program translates symbol- 
ic instructions into machine language 
instructions, assigns storage locations, 
and performs auxiliary functions necessary 
to produce an executable machine language 
program. 



ASS EMBLER LANGUAGE 

The basis of the assembler language is a 
collection of mnemonic symbols which 
represent : 

1. Machine language operation codes, 

2. Operations (auxiliary functions) to be 
performed by the assembler program. 

The language is augmented by other sym- 
bols, supplied by the programmer and used 
to represent storage addresses or data. 
Symbols are easier to remember and to code 
than their machine language equivalents. 
Use of symbols greatly reduces programming 
effort and error. 

The programmer may also create a type of 
instruction called macro instructions, for 
which mnemonic symbols, supplied by the 
programmer 9 serve as operation codes. 

Machine Operation Codes 

The assembler language provides mnemonic 
machine instruction operation codes for all 
machine instructions in the Universal 
Instruction Set and provides extended 
mnemonic operation codes for the conditional 
branch instruction. 



Assembler Operation Codes 

The assembler language also contains 
mnemonic assembler instruction operation 
codes that specify auxiliary functions to 
be performed by the assembler program. 
These instructions to the assembler pro- 
gram, with a few exceptions, do not result 
in the generation of any machine language 
code by the assembler program. 

Macro Instructions 

The assembler language enables the pro- 
grammer to define and use macro instruc- 
tions that are represented by operation 
codes specifying sequences of machine and/ 
or assembler instructions that accomplish 
the desired function. 

Macro instructions used in preparing an 
assembler language source program are eith- 
er: (a) system macro instructions, pro- 
vided by IBM, that relate the object pro- 
gram to components of the operating system, 
or Cb> macro instructions created by the 
programmer specifically for the program at 
hand or for incorporation in a library. 

Programmer- created macro instructions 
simplify program writing and ensure that a 
standard sequence of instructions is used 
to accomplish a desired function. 

For instance, the logic of a program may 
require repetitive execution of the same 
instruction sequence. Rather than code the 
entire sequence every time it is needed, 
the programmer creates a macro instruction 
that represents the sequence. Then whenev- 
er the sequence is needed, the programmer 
codes the macro instruction statement. 
During assembly the corresponding sequence 
of instructions is inserted in the object 
program. 

The language and procedures for defining 
and using macro instructions are discussed 
in Part Two. 



ASSEMBLER PROGRAM 

The assembler program, or assembler, 
processes source statements that are writ- 
ten in the assembler language. 

Virtual Storage Concept 

TSS permits the concept of a "virtual 
storage", whose size is the maximum 
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addressing capability of the computer 

systera. 

The 24-bit addressing capability per- 
mits 12-bit base addressing (4096 base 
addresses) and 12-bit byte addressing 
(4096 byte addresses) -- a maximum of 
over 16 million addressable bytes. In 
programming, however, the user is usual- 
ly restricted to addresses that represent 
physical storage on his machine. Such a 
program cannot address 16 million contigu- 
ous bytes directly, but must be structured 
as a series of overlays. For the Model 67, 
which has been modified for 32-bit address- 
ing, the capacity of virtual storage is 
over four billion bytes. 



The time sharing monitor assigns active 
programs to whatever physical storage is 
available. Automatic relocation techniques 
are used to distribute the logical program, 
as written by the programmer, into physical 
locations that are consistent with effi- 
cient operation of the system. These relo- 
cation techniques need not concern the pro- 
grammer. He may write his program as if 
contiguous bytes of storage were available 
for each assembly. 



PROGRAMMER AIDS 

The auxiliary functions of the assembler 
program assist the programmer in checking 
and documenting programs , controlling 
address assignment, segmenting programs, 
defining data and symbols, generating macro 
instructions, and controlling the assembly 
program itself. Mnemonic operation codes 
for these functions are provided in the 
language. 

Variety in Data Representation : The pro- 
grammer selects decimal, binary, hexadecim- 
al, or character representations of machine 
language binary values that best suit his 
purposes in writing source statements. 

Base Register Address Calculation : The 
addressing scheme requires designation of 
a base register (containing a base address 
value) and a displacement value to specify 
a storage location (discussed in IBM 
Principles of Operation ) . The assembler 
assumes the clerical burden of calculat- 
ing relative virtual storage addresses in 
these terms for the symbolic addresses 
used by the programmer. The programmer 
retains control of base register usage 
and the values entered therein. 



Basic Functions 

Processing involves translating source 
statements into machine language, assigning 

virtual storage locations to instructions 
and other elements of the program, and per- 
forming the auxiliary assembler program 
functions designated by the programmer. 

The output of the assembler program is the 

object program, a machine language equiva- 
lent of the source program* Upon the PRINT 
request of the programmer, the assembler 
program furnishes a printed listing of the 
source- and object-program statements, and 
presents additional information* such as 
error indications, that may be useful to 
him in analyzing his program. (Nonconver- 
sational users may arrange to have listings 
printed directly without the PRINT command 
by so specifying in the ASM command.) The 
object program is in the format required by 
the linkage and loading components of Time 
Sharing System, 



The assembler uses virtual storage to 
allocate its working storage. Thus, lan- 
guage elements that are customarily limited 
by the capacity of internal tables are, in 
effect, limited only by the size of virtual 
storage available to the TSS Assembler. 



Relocatability ; The TSS assembler assigns 
virtual storage locations to a program. 
Physical storage locations are assigned 
to virtual storage components, when the 
program is executed, by a combination 
of linkage programming and automatic 
relocation features. 

Sectioning and Linking s The assembler lan- 
guage and program provide facilities for 

partitioning an assembly into one or more 
parts, called control sections* Special 
control sections provide facilities for 
reenterable programs and the "common 8 * data 
feature for FORTRAN, 

The assembler allows symbols to be 
defined in one assembly and referred to in 
another, thus effecting a link between 
separately assembled programs. This per- 
mits reference to data and/or transfer of 
control between programs. Sectioning and 
linking is discussed in Section 3, under 
"Program Sectioning and Linking." 

Program Listings z A listing of source pro- 
gram statements and resulting object pro- 
gram statements may be produced by the 
assembler for each source program. The 
programmer can, to some extent, control the 
form and content of the listing. 

Conversational users will have selected 
listings automatically stored in a list 
data set which may be later obtained on an 
output device by issuing the PRIOT command. 



The user may 
default by r 
printed out 
Nonconversat 
listings put 
immediately 
to IBM Time 



U ser's Guide 
nation of th 
process . ) 



however, override this 
equesting that listings be 
immediately at his terminal, 
ional users may choose to have 

either in a list data set or 

onto an output device. (Refer 

Sharing System Command System 

GC28-2001 for a full expla- 

e listing data set maintenance 



Error Indications ; As a source program is 
assembled t it is analyzed for actual or 
potential errors in the use of the assembl- 
er language. Detected errors are indicated 
in the program listing or in conversational 
mode during the actual assembly run. 



OPERATING SYSTEM RELATIONSHIPS 

The assembler, a component of TSS, 
functions under control of the operating 



system that provides the assembler with 
input/output, supplementary macro library, 
system macro library, and other services 
needed in assembling a source program. 
Similarly, the object program produced by 
the assembler will operate under control of 
TSS and will depend on it for input/ 
output and other services. In writing the 
source program > the programmer must include 
statements requesting the desired functions 
from TSS. These statements are discussed 
in IBM Time Sharing System Assembler User 
Macro Instructions. 



The assembler will create the proper 
linkage between the object program and the 
specified service components of the operat- 
ing system. More specific information on 
operating system relationships is in con- 
cents and Facilities . 
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SECTION 2: GENERAL INFORMATION 



This section presents information about 
assembler language coding conventions, 
assembler source statement structure, 
addressing, and sectioning and linking of 
programs. 



ASSEMBLER LANGUAGE CODING CONVENTIONS 
Input Sources 



A source program 
statements that have 
into cards and enter 
typed at the keyboar 
device; the statemen 
slightly between the 
format is identical 
assembler languages; 
was designed for use 
terminal devices. 



is a sequence of source 
either been punched 

ed by card reader, or 

d of a remote terminal 

t formats differ 
two sources. The card 

to that in other IBM 
the keyboard format 
at typewriter-like 



Punched Card Coding Form 

Assembler language source statements may 
be written on the standard coding form, 
X28-6509 (Figure 1>, provided by IBM. One 



line of coding on the form is punched into 
one card? vertical columns on the form 
correspond to card columns. 

Space is provided for program identifi- 
cation and instructions to keypunch opera- 
tors. The body of the form is composed of 
the statement field, columns 1-71, and the 
identification sequence field, columns 
73-80, The identification sequence field, 
not part of a statement, is discussed under 
•Statement Format, " below. 

The entries (coding) that compose a 
statement occupy columns 1-71 of a state- 
ment line and, if needed, columns 16-71 of 
up to two successive continuation lines . 

Statement Boundaries — Card Format 

Source statements are normally in 
columns 1-71 of statement lines and columns 
16-71 of continuation lines. Therefore, 
columns 1, 71, and 16 are referred to as 
the "begin,* "end, " and "continue" columns, 
(This convention may be altered by use of 
the input format control (ICTL) assembler 



IBM Assembler Coding Form 




Figure 1 . Coding Form 



instruction, which will be discussed 

later, > The continuation character, if 

used, always immediately follows the end 
column. 

Continuation Lines -- card Format 

When it is necessary to continue a 
ntatement on another line, these rules 

apply. 

1 . Enter a continuation character (not 
blank, and not part of the statement 
coding) in the column following the 
end column (normally column 72) of the 
statement line. 

2. Continue the statement on the next 
line, starting in the continue column 
(normally column 16) i all columns to 
the left of the continue column must 
be blank. 

3 . When more than one continuation line 
is needed,, each line to be continued 
must have a character (not blank, and 
not part of the statement coding) 
entered in the column following the 
end column (normally column 72) • 

**. Only two continuation lines may be 

used for a normal statement, A macro 
instruction, however, may use as many 
ae necessary. 

character Sets — Card Format 

Source statements may be entered into 
TSS from punched cards in three ways: 
from the installation's high-speed card 
reader, from an IBM 2780 Data Transmission 
Terminal located away from the central 
installation (remote job entry) , or from an 
IBM 1056 Card Reader attached to a 1052 
Printer-Keyboard . 

Cards read into the central or remote 
job entry card readers must be in 029 key- 
punch code, which is converted to EBCDIC. 
Cards read into the 1056 Card Reader may be 
in either 1057 card punch code or 029 punch 
code. 

To initiate punched card input from the 
1056 Card Reader, the user must type in CA f 
CB, or C on the keyboard. CA transfers 
control from the keyboard to the reader and 
specifies conversion from 1057 card punch 
code to EBCDIC. CB transfers control to 
the reader and specifies conversion from 
029 punch code to EBCDIC, c transfers con- 
trol to the reader using the following con- 
vention: if keyboard mode was KA, CA will 
be the new mode; if KB was the keyboard 
mode, CB will be the new mode. If some 
cards were punched on the 1057 and others 
on the 029, the commands CA and CB may be 
inserted at any place in the deck where it 



is necessary to change the mode. (Further 
information on the use of C, CA, and CB 
will be found in Command System User's 
Guide and Terminal User's Guide .) 

Statement Boundaries — ■ Keyboard Format 

Source statements occupy the area 
between: (a) the column at which the com- 
mand language interpreter releases the key- 
board to the user and Cb) the right-hand 
margin setting. This area is not 
restricted to 80 columns. 

Continuation Lines — Keyboard Format 

When it is necessary to continue a 
statement that is being entered from a key 
board, the continuation character is typed 
at the point at which continuation is 
desired, followed immediately by a carrier 
return. (For example, on the I5M 1052 
Printer-Keyboard, the continuation charac- 
ter is a hyphen.) The statement is con- 
tinued at the first non-blank, non-tab 
character of the next line. 

Character Sets — Keyboard Format 

KA and KB can be used to specify the 
character set to be used during keyboard 
input. With KA, the user indicates he 
wishes to use the full EBCEIC character 
set. With KB f the user specifies that the 
lower case characters Ca-z and I " «-) be 
translated into their upper case equiva- 
lents CA-Z and $ #8). 

Statement Format 

Statements may consist of one to four 
entries. They must be written in this or- 
der, left to right: name entry, operation 
entry, operand entry, and comments entry. 
These entries must be separated by one or 
more blanks (or a horizontal tab character 
from the keyboard) • 

For punched card input, the coding form 
provides an 8- character name field, a 5- 
character operation field, and a 56- 
character operand and/or comments field. 

If the programmer wants to disregard 
these boundaries and write the name, opera- 
tion, operand, and comment entries in other 
positions, he is subject to these rules: 

1. On punched cards, the entries must not 
extend beyond statement boundaries 
(either the conventional boundaries, 
or as designated by the programmer via 
the ICTL instruction) • 

2. Entries must be in proper sequence. 

3. Entries must be separated by one or 
more blanks. 
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4. A name entry must start in the begin 
column. 

5. Name and operation entries roust be 
completed in the first line of the 
statement, Including at least one 
blank following the operation entry • 

In the descriptions of the entries, 
below, the assembler regards a horizontal 
tab character in keyboard format as a 

single blank. 

Name Entry : This symbol, usually optional, 
is created by the programmer to identify or 
label a statement. The symbol must consist 
of eight characters or less; the first 
character must be entered in the begin 
column. If the begin column is blank, the 
assembler assumes no name has been entered? 
no blanks may appear within the name entry. 

Operation Entry ; The mnemonic operation 
code specifies the machine operation, 
assembler, or macro instruction operation 
desired. An operation entry is mandatory 
and must start at least one position to the 
right of the begin column; it cannot appear 
in a continuation line. Valid mnemonic 
operation codes for machine and assembler 
operations, given in Appendixes B and C, 
consist of five characters or less for 
machine or assembler operation codes, and 
eight characters or less for macro instruc- 
tion operation codes. No blanks may appear 
within the operation entry. 

Operand Entry ; This entry identifies and 
describes data Csuch as storage locations, 
masks , storage area lengths, or types of 
data) associated with the instruction. 

Operands are required for all machine 
instructions and, depending on the needs of 
the instruction, one or more operands may 
be written. Operands must be separated by 
commas. No blanks may appear between 
operands and the commas that separate them. 
The operands may not contain embedded 
blanks except when character representation 
specifies a constant, a literal, or immedi- 
ate data in an operand; e.g., CAB D* . 

Comments Entry : These are information 
items about the program that are to be 
inserted in the program listing. All valid 
characters (see "Character Set," below), 
including blanks, may be used in writing a 
comment. The entry may follow the operand 
entry and must be separated from it by a 
blank; comments entries cannot extend 
beyond the end column (normally column 71) . 

An entire line, or a series of lines, 
may be used for comments, by placing an 
asterisk in the begin column of each line. 
Also, continuation lines, described above, 
may be used. 



In statements where an optional operand 
entry is omitted, or in statements which 
allow no operand but in which a comments 
entry is desired, the absence of the 
operand entry must be indicated by a comma 
preceded and followed by one or more 
blanks. 



j Name j Operation j Operand 
H - + 4 ... 

j | END |, COMMENT 



Statement Example : A compare instruction 
is named by the symbol COMP; the operation 
entry (CH) is the mnemonic operation code 
for a register-to-register compare opera- 
tion; and the two operands (5,6) designate 
two general registers whose contents are to 
be compared. The comments entry reminds 
the programmer that he is comparing "new 
sum" to "old." 



(Name (Operation (Operand | 

(COMP (CR (5,6 NEW SUM TO OLD | 

L . x x . . J 



Identification Sequence Field 

For source statements that originate 
from punched cards, the identification 
sequence field of the coding form (columns 
73-80) is used to enter the optional pro- 
gram identification and/or statement 
sequence characters. If the field, or a 
portion of it, is used, the program identi- 
fication is punched in the statement cards 
and reproduced in the printed listing of 
the source program. 

The programmer may number the cards in 
this field, to keep source statements in 
order, by punching appropriate characters 
into the cards. During assembly, he may 
request the assembler to verify this 
sequence by using the input sequence check- 
ing (ISE£) assembler instruction (see Sec- 
tion 5, "Program Control Instructions"). 

Caution When Changing Card-Origin 
Statements 

Source statements from punched cards may 
later be changed, using various commands of 
the TSS Text Editor (the Text Editor 
commands are described in Command System 
User's Guide ) . 

On assembly, each source statement of 
punched card origin is treated as an 80- 
character record. Where the statement has 
been shortened to fewer than 80 characters 
by changing it with a Text Editor command 
after it has been stored, the assembler, 



before further processing, pads the state- 
ment to 80 characters with trailing blanks. 
Where the statement has been changed to 
contain more than 80 characters, the 
assembler truncates the statement to 80 
characters. 

Care must be taken in changing a card- 
origin source statement so that, after pad- 
ding or truncation by the assembler, the 
statement will still conform to the coding 
conventions discussed in this section. (An 
example might be a statement containing a 
sequence number in the identification 
sequence field, columns 73-80. The state- 
ment is shortened one character during text 
editing* The assembler pads with one 
trailing blank in column 80, leaving 
columns 7 2-79 containing the sequence num- 
ber. Since column 72 is normally the con- 
tinuation column, an error results if the 
next source statement is not a continuation 
line.) 



Summary of statement Format 

Entries in a statement must always be 
separated by at least one blank and must be 
in this order i name, operation, operands, 
comment. 

Every statement requires an operation 
entry; name and comment entries are option- 
al. Operand entries are required for all 
machine instructions and most assembler 
instructions. 

The name and operation entries must be 
completed in the first statement line, 
including at least one blank following the 
operation entry. 

The name and operation entries must not 
contain blanks; operand entries must not 
have blanks preceding or following the com- 
mas that separate them. 

A name entry must always start in the 
begin column. 

If the column after the end column is 
blank, the next line must start a new 
statement. If the column after the end 
column is not blank, the following line 
will be treated as a continuation line. 

All entries must be contained within the 
designated begin-, end*, and continue- 
column boundaries. 

Character Set 

Source statements use these characters: 

Letters A through Z $ # a 



Digits 



through 9 



Special 

Characters ♦ -, = .* C ) 8 / 6 blank 



Any of the remainder of the 256 punch 
combinations may be designated anywhere 
that characters may appear between paired 
apostrophes, and in comments. 



ASSEMBLER LANGUAGE STRUCTURE 

A source statement is composed of: 

• A name entry (usually optional) 

• An operation entry (mandatory) 

• An operand entry (usually required) 
A name entry is* 

• A symbol 

An operation entry is: 

• A mnenomic operation code representing 
a machine, assembler, or macro 
instruction* 

An operand entry is: 

• One or more operands composed of one or 
more expressions, which, in turn, are 
composed of a term or an arithmetic 
combination of terms. 

Operands of machine instructions gener- 
ally represent such things as storage loca- 
tions, general registers, immediate data, 
or constant values. Operands of assembler 
instructions provide the information needed 
by the assembler program to perform the 
designated operation. 

This structure is shown in Figure 2. 
Terms shown in the figure are classed as 
absolute or relocatable, depending on how 
program relocation affects them. The relo- 
cation consideration in the following dis- 
cussions is the adjustment, by the loader 
or linkage editor, of the virtual storage 
assignments that were made by the assembl- 
er. This adjustment usually takes the form 
of a base increment that is added to the 
original virtual storage location assign- 
ments. A term is absolute if its value 
does not change when such an adjustment is 
made and is relocatable if its value 
changes upon relocation. 
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Niom* Entry 



(Operation Entry] 



, 9 

j Operand Entry 



it o 
Symbol 



it o 

Mnemonic 

Operation Code 



Operands 
one or more 



that are [composed of on 



Machine 
Instruction 



A Symbol 
e.g., SETA 
(AT or RT> 



A. 



Assembler 
Instruction 



Term 



which may be 
any one of 
the following 



Self-Defining 
Term 

1*2 



A Location 
Counter Refer- 
ence e.g.,* 

-JED 



Exp 



Exp (Exp) 



A Literal 

e.g. # =F i 1259* 

(RT) 



Symbol Length 
Attribute Refer 
ence e.g., 
t'Symbol (Aft 



which may be 
any one of 
the following 



Oecimot 
•.g.,15 



Exp(Exp,Exp) 




Arithmetic 
Combination 
of Terms 



follows 



AT op AT op.. 





RT+ RT+ ... 


or 






AT+ RT+ ... 




or 






RT+ AT + ... 





Hexadecimal 
e.g.jX'C^ 



Si nary 

e.g., nor 



Legend: 

Exp = Expression; AT * Absolute Term; RT = Relocatable Terr 
Arithmetic Operators (op): 

+ ..... Addition 

- ..... Subtraction 

* Multiplication 

/ ..... Division 



Character 
e.g.,CAB9' 



Figure 2. Assembler Language Structure — Machine and Assembler 
8 



TERMS AND EXPRESSIONS 

TERMS 

Every term represents a value that may 
be assigned by the assembler program (sym- 
bols, symbol length attribute, location 
counter reference) , or that may be inherent 
in the term itself (self- defining term lit- 
eral). An arithmetic combination of terms 
is reduced to a single value by the 
assembler . 

The following material discusses each 
type of term and the rules for its use. 

Symbols 

A symbol is a character or combination 
of characters that represents addresses or 
arbitrary values. 

Symbols, through their use as names and 
in operands, provide the programmer with a 
way to name and refer to a program element. 
A symbol created by the programmer for use 
as a name entry and in an operand must con- 
form to these rules: 

1. The symbol must consist of not more 
than eight characters. The first 
character must be a letter, the other 
characters may be letters, digits, or 
any combination of the two. 

2. No special characters may be included 
in a symbol. 

"*. No blanks are allowed in a symbol. 

These are valid symbols: 



READER 


LOOP2 


3B«* 


A23456 


N 


$A1 


X4F2 


S<* 


#56 



These symbols are invalid, for the 
reasons noted: 

256B (first character is not 

alphabetic) 

REC0RDAREA2 (more than eight 
characters) 

BCD*34 (contains a special char- 
acter - *) 

IN AREA (contains a blank) 

Defining Symbols : The assembler assigns a 
value to each symbol appearing as a name 
entry in a source statement. The values 
assigned to symbols that name storage 
areas, instructions, constants, and control 
sections are the addresses of the leftmost 
bytes of the storage fields containing the 
named items. Since the addresses of these 
items may change with program relocation, 
the symbols naming them are considered 
relocatable terms. 



A symbol used as a name entry in the 
equate (EQU) assembler instruction is 
assigned the value designated in the 
operand entry of the instruction. Since 
the operand entry may represent a relocat- 
able value or an absolute (nonchanging) 
value, the symbol is considered a relocat- 
able, or absolute, tern, depending upon the 
value it is equated to. 

The assembled value of a symbol may not 
be negative and may not exceed 2 a *~l except 
when using a 32-bit machine where its allo- 
cated value may be as high as 2* a ~l# 

A symbol is defined when it appears as 
the name of a source statement. (A special 
case of symbol definition is discussed in 
Section 3, "Program Sectioning and 
linking.") 

Symbol definition also involves the 
assignment of a length attribute to the 
symbol. (The assembler program maintains 
an internal symbol table that has the 
values and attributes of symbols. When the 
assembler encounters a symbol ift an 
operand, it refers to the table for the 
values associated with the symbol.) The 
symbol's length attribute is the size, in 
bytes, of the storage field whose address 
is represented by the symbol. For example, 
a symbol naming an instruction that occu- 
pies four bytes of storage has a length 
attribute of 4. 

Previously Defined Symbols : Some instruc- 
tions require that a symbol appearing in 
the operand entry be previously defined; 
that symbol, before its use in an operand, 
must have appeared as a name entry in a 
prior statement. 

General Restrictions on Symbols : A symbol 
may be defined only once in an assembly; 
each symbol used as a statement name must 
be unique to that assembly. However, a 
symbol may be used in the name field more 
than once as a control section name 
(defined in the START, CSECT, or DSECT 
assembler statements, described in Section 
3) because the coding of a control section 
may be suspended and then resumed at any 
subsequent point. The CSECT or DSECT 
statement that resumes the section must be 
named by the same symbol that initially 
named the section; thus, the symbol that 
names the section must be repeated. Such 
usage is not considered to be duplication 
of a symbol definition. 



Self-Defining Terms 

The value of a self -defining term is 
inherent in the term; for example, the 
decimal self -defining term 15 represents a 
value of fifteen. The value of a self- 
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defining term is absolute; it does not 
change when the program is relocated. 

The four types of self-defining terms — 
decimal, hexadecimal f binary, and character 
-- are used as the machine language binary 
value or bit configuration they represent. 
The type of term selected depends on what 
is being specified. 



us ing Self - De f inlng Terms ; These terms, 
representing machine values or bit confi- 
gurations, are used to specify program ele- 
ments, such as immediate data, masks, regi- 
sters, addresses, and address increments. 

Seif-defining terms are distinct from 
data constants or literals. When a self- 
defining term is used in a machine instruc- 
tion statement, its value is assembled into 
the instruction. When a data constant or 
literal is specified in the operand of an 
instruction, its address is assembled into 
the instruction. 



Decimal Self-Defining Term : A decimal 
self-defining term is simply an unsigned 
decimal number written as a sequence of 
digits; high-order Os may be used (e.g., 
007 K Limitations on the value of a term 
depend on its use. For example, a decimal 
term that designates a general register 
should have a value between and 15 inclu- 
sive! one that represents an address should 
not exceed the size of storage. In any 
case, the value of a decimal term may not 
exceed **, 29U § 967,295 12**~1) . A decimal 
term is assembled as its binary equivalent. 
Some examples of decimal self-defining 
terms are 8, 147, H092, and 00021. 



Hexadecimal Self-Defining Term : A hexade- 
cimal self-defining term is ^n unsigned 
hexadecimal number written as a sequence of 
hexadecimal digits. The digits must be 
enclosed in apostrophes and preceded by the 
letter X; for example, X , C49 i . 

Each hexadecimal digit is assembled as 
its 4-bit binary equivalent. Thus, a hexa- 
decimal term used to represent an 8-bit 
mask would consist of two hexadecimal 
digits. The maximum value of a hexadecimal 
term is X'FFFFFFFF 1 . 

The hexadecimal digits and their bit 
patterns are: 



0- 0000 

1- 0001 

2- 0010 

3- 0011 



*4~ 0100 

5- 0101 

6- 0110 

7- 0111 



8- 1000 

9- 1001 
A- 1010 
B- 1011 



C- 1100 
D- 1101 
E- 1110 
F- 1111 



Binary Self-Defining Term s A binary self- 
defining term is written as an unsigned 
sequence of Is and 0s enclosed in apos- 
trophes and preceded by the letter Bj for 
example, B'lOOOllOl". This term would 
appear in storage as shown, occupying one 
byte. A binary term may have up to 32 
bits. Binary representation is used pri- 
marily in designating bit patterns of masks 
or in logical operations. 

The following example illustrates a 
binary term used as a mask in a test under 
mask (TM) instruction. The contents of 
GAMMA are to be tested, bit by bit, against 
the pattern of bits represented by the 
binary term. 



j name } Operation j Operand 

| ALPHA | TM | GAMMA, B v 10101101 ' 



i 



Character Self-Defining Term : A character 
self-defining term consists of one to four 
characters enclosed by apostrophes i it must 
be preceded by the letter C. All letters, 
decimal digits, and special characters may 
be used in a character term. Also, any of 
the remainder of the 256 punch combinations 
may be designated in a character self- 
defining term. Examples of character self- 
defining terms ares 



cv 

C f ABC s 



C f • (blank) 

C s 13 i 



Because apostrophes, in the assembler 
language, and ampersands, in the macro 
instruction language, are used as syntactic 
characters, the following rule must be 
observed when using these characters in a 
character terms For each apostrophe or 
ampersand desired in a character self- 
defining term, two apostrophes or amper- 
sands must be written. For example, the 
character value A f # would be written as 
•A***', while an apostrophe followed by a 
blank and another single apostrophe would 
be written as ,M ,M . 

Each character in the character sequence 
is assembled as its 8-bit code equivalent. 
The two apostrophes or ampersands that 
must be used to represent a single 
apostrophe or ampersand within the char- 
acter sequence are assembled as a single 
apostrophe or ampersand. 

location Counter : A location counter is 
used to assign storage addresses to program 
statements i it is the assembler's equiva- 
lent of the instruction counter in the com- 
puter. As each machine instruction or data 
area is assembled, the location counter is 
adjusted to the proper boundary for the 
item, if adjustment is necessary, and then 
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incremented by the length of the assembled 
item. Thus, it always points to the next 
available location. If the statement is 
named by a symbol, the value attribute of 
the symbol is the value of the location 
counter after boundary adjustment, but 
before addition of the length. 

The assembler maintains a location coun- 
ter for each control section of the program 
ind manipulates each location counter as 
previously described. Source statements 
tor each section are assigned addresses 
irore the location counter for that section. 
within each control section, the location 
counter controls the assignment of consecu- 
tively higher virtual storage locations. 
Thus, if a program has multiple control 
sections, all statements identified as 
belonging to the first control section will 
be assigned from the location counter for 
section 1; the statements for the second 
section from the location counter for sec- 
tion 2? etc. This procedure is followed 
whether the statements from different con- 
trol sections are interspersed or written 
in control section sequence. 



The location 
t rolled by using 
<»i instructions, 
Sections 3 and S 
either of these 
the counter for 
which it appears 
counter is 2 a *~2 



counter setting can be con- 
the START and ORG assembl- 
which are described in 
The counter affected by 
assembler instructions Is 
the control section in 

the maximum value for the 



Location Counter Reference 

The programmer may refer to the current 
value of the location counter at any place 
in a program by using an asterisk in an 
operand. The asterisk represents the loca- 
tion of the first byte of currently avail- 
able storage (that is, after any required 
boundary adjustment) . Using an asterisk in 
a machine instruction statement is the same 
as placing a symbol in the name field of 
the statement and then using that symbol as 
an operand of the statement. Because a 
location counter is maintained for each 
control section, a location counter 
reference designates the location counter 
for the section in which the reference 
appears. 

A reference to the location counter may 
Le made in a literal address constant (that 
is, the asterisk may be used in an address 
constant specified in literal form). The 
address of the instruction containing the 
literal is used for the value of the loca- 
tion counter. A location counter reference 
may not be used in a statement that 
requires the use of a predefined symbol, 
excepting the EQU and ORG assembler 
instructions . 



literals 

This is a constant preceded by an equal 
sign (=), one of three basic ways to intro- 
duce data into a program. 



A literal represents data, rather than a 
reference to data. The inclusion of a lit- 
eral in a source statement directs the as- 
sembler to: (a) assemble the value speci- 
fied by the lateral, (b) store this value 
in a "literal pool,* and (c) place the 
address of the storage field containing the 
value in the operand field of the assembled 
source statement. 

Literals provide a means of entering 
constants (such as numbers for calculation 
and addresses, indexing factors, or words 
or phrases for printing out a message) into 
a program by specifying the constant in the 
operand of the instruction in which it is 
used. This may be done rather than using 
the DC (define constant, see Section 5> as- 
sembler instruction to enter the data into 
the program, and then using the name of the 
DC instruction in the operand. 

Only one literal is allowed in a machine 
instruction statement and it may not be 
combined with any other terms; also, it may 
not be used as the receiving field of an 
instruction that modifies storage. A lit- 
eral may not be specified in an address 
constant. (However, an address constant 
nray be specified as a literal.) 

This instruction shows one use of a 
literal: 

(Name J Operation (Operand | 

IGAMMA|L IIO^F^?** 1 | 

The statement GAMMA is a load instruc- 
tion using a literal as the second operand. 
When assembled, the* second operand will be 
the address at which the value represented 
by F^TH* is stored. 

In general, literals may be used wherev- 
er a storage address is permitted as an 
operand. They may not, however, be used in 
any assembler instruction that requires the 
use of a previously defined symbol, 
literals are considered relocatable because 
the address of the literal, rather than the 
literal itself, will be assembled in the 
statement that employs a literal. The as- 
sembler generates the literals, collects 
them, and places them in a specific storage 
area (explained in "Literal Pool," below). 

A literal is not to be confused with the 
immediate data in an SI instruction; such 
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data is assembled into the instruction and 
* s B2*: preceded by an equal sign (=) . 

Literal Format : The assembler requires 
descriptions of the specified type of lit- 
eral and of the literal itself. Those 
descriptions assist the assembler in 
assembling the literal correctly. The 
descriptive portion of the literal must 
indicate the format of the constant, and it 
may specify the constant's length. 

The Kethod of describing and specifying 
a constant as a literal is nearly identical 
to the method of specifying it in the 
operand of a DC assembler instruction. The 
major difference is that the literal must 
etart with an equal sign (=) to indicate to 
the assembler that a literal follows. 
ISpecif ication of a literal is covered in 
the DC assembler instruction operand for- 
mat, in Section 5.) The type of literal 
designated in an instruction is not checked 
for correspondence with the operation code 
of the instruction. 

Some examples of literals are; 

=A(BETA) — address constant literal 
=F f 123«l • — fixed point, i*-byte number 
^•ABC* — character literal 

Literal Pool : The literals processed by 
the assembler are collected and placed in a 
special area called the literal pool; the 

location of a literal, rather than the lit- 
eral itself, is assembled in a statement 
using a literal. The positioning of the 
literal pool may be controlled by the pro- 
grammer, if he bo desires. Unless other- 
wise specified, the literal pool is placed 
at the end of the first control section 
(CSECTK To facilitate writing reenterable 
programs, if the assembly contains one or 
more prototype control sections CPSECTs) , 
literal address constants are placed in a 
pool at the end of the first prototype con- 
trol section. 



is made by coding 1/ followed by the sym- 
bol; for example, L'BETA. The length 
attribute of BETA will be substituted for 
the term. The following example illus- 
trates the use of L 1 symbol in moving a 
character constant into either the high- 
order or low-order end of a storage field. 



For ease in following the example, the 
length attributes of Al and B2 are men- 
tioned. However, keep in mind that the 
L f symbol term makes coding such as this 
possible in situations where lengths are 
unknown. 






r T . — T . 

(Name (Operation (Operand 

|A1 [OS |CL8 | 

|B2 | DC | |CL2 , AB i | 

| HIORD |MVC (AICI/ B2),B2 | 

|LOORD|MVC |Al+L , Al-L f B2CL'B2),B2 ( 

L_ X _. A-- . -_J 

Al names an 8-byte storage field and is 
assigned a length attribute of 8. B2 names 
a 2-tyte character constant and is assigned 
a length attribute of 2. HIORD moves the 
contents of B2 into the leftmost two bytes 
of Al; the term L f B2 in parentheses pro- 
vides the length specification required by 
the instruction. When the instruction is 
assembled, the length is placed in the pro- 
per field of the machine . instruction- 

LOORD moves the contents of B2 into the 
rightmost two bytes of Al. The combination 
of terms A1*L'A1-L'B2 results in the addi- 
tion of the length of Al to the beginning 
address of Al, and the subtraction of the 
length of B2 from this value. The result 
is the address of the seventh byte in field 
Al. The constant represented by B2 is 
ttoved into Al, starting at this address. 
L'B2 in parentheses provides length speci- 
fication, as in HIORD. 



The programmer can also specify the 
creation of multiple literal pools. How- 
ever, the sequence in which literals are 
ordered within the pool is controlled by 
the assembler. Literals that are eight 
bytes, or a multiple of eight are aligned 
at a doubleword boundary; 4-byte literals 
are aligned at a word boundary; 2- byte 
literals are aligned at a halfword; and 
literals with an odd number of bytes are 
aligned at the next available storage loca- 
tion. Further information on positioning 
literal pools is in Section 5, under "LTORG 
~~ Begin Literal Pool." 

Symbol Length Attribute Reference 

The length attribute of a symbol may be 
used as a term. Reference to the attribute 



Terms in Parentheses 

These are reduced to a single value, so 
they, in effect, become a single term. 
Arithmetically combined terms, enclosed in 
parentheses, may be used in combination 
with terms outside the parentheses: 

1 4* BETA- CGAM4A- LAMBDA) 

When the assembler program encounters 
terms in parentheses in combination with 
other terms, it reduces the combination of 
terms inside the parentheses to a single 
value which may be absolute or relocatable, 
depending on the combination of terms. 
This value then is used in reducing the 
rest of the combination to another single 
value. 
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Terms in parentheses may be included 
within a set of terms in parentheses: 

A*B-CC*D-(E*F>+10) 



The innermost set of terms in paren- 
theses is evaluated first. For compatibil- 
ity with other IBM assemblers, expres- 
sions should be limited to five levels 
of parentheses? parentheses which occur as 
part of an operand format are not included 
in this five-level limit. Programs written 
expressly for the TSS assembler are not 
restricted in the number of levels of 
parentheses that may be used. 



EXPRESSIONS 

This subsection discusses the two types 
of expressions, absolute and relocatable, 
used in coding operand entries for source 
statements, together with the rules for 
determining these attributes of an 
expression. 

An expression is composed of a single 
term or an arithmetic combination of terms, 
as shown in Figure 2* These are examples 
of valid expressions: 



AREA1*X'2D° 

♦ ♦32 

N-25 

FIELD+332 

FIELD 

<EXIT-ENTRY*1>4-G0 

= F i 123<* i 

ALPHA- BETA/ C 10*AREA*L f FIELD J -100 



BETA*10 

B'lOl 1 

C'ABC 1 

2* 

I 1 FIELD 

LAMBDA ♦GAMMA 

TEN/TWO 



The rules for coding expressions are: 

1. An expression may not start with an 
arithmetic operator, (♦-/*). The 
expression -A+BETA is invalid; 0-A* 
BETA is valid. 

2. An expression may not contain two suc- 
cessive terms or two operators. 

3. For compatibility with other IBM 
assemblers, an expression should not 
consist of more than 16 terms or 
contain more than five levels of 
parentheses. For programs written 
expressly for the TSS assembler, 
there is no restriction on the number 
of terms or levels of parentheses. 

4. A multiternt expression may not contain 
a literal. 

Expressions containing more than five 
levels of parentheses produce warning mes- 
sages, but are assembled correctly. 



Evaluation of Expressions 

A single term expression; for example, 
29, BETA, *, L* ALPHA, takes on the value of 
the term involved. 

A multiterm expression; for example, 
BETA*10, ENTRY-EXIT, 25*10*A/B, is reduced 
to a single value, as follows: 

1. Each term is given its value. 

2. Arithmetic operations are performed 
left to right. Multiplication and 
division are done before addition and 
subtraction; for example, A+B*C is 
evaluated as A+(B*C), not (A+E)*C 
The computed result is the value of 
the expression. 

3. Division always yields an integer 
result; for example, 1/2*10 yields 0; 
10*1/2 yields 5. 

4. Division by is valid and yields a 
result. 

Parenthesized multiterm expressions used 
in an expression are processed before the 
rest of the terms in the expression; for 
example, in A* BETA* (CON- 10) , the term CON- 
10 is evaluated first and the resulting 
value is used in computing the final value 
of the expression. 

Absolute and Relocatable Expressions 

An expression is absolute if its value 
is unaffected by program relocation; it is 
relocatable if its value changes upon pro- 
gram relocation. The two types of expres- 
sions, absolute and relocatable, take on 
these characteristics from the terms com- 
posing them. 

Absolute Expression : This may be either an 
absolute term or any arithmetic combination 
of absolute terras. An absolute term may be 
an absolute symbol, any of the self- 
defining terms, or a length attribute 
reference. All arithmetic operations are 
permitted between absolute terms, as indi- 
cated in Figure 2. 

An absolute expression may contain relo- 
catable terms (RT) , alone or in combination 
with absolute terms (AT) f under these 
conditions: 

1. There must be an even number of relo- 
catable terms in the expression. 

2. The relocatable terms must be paired. 
Each pair must have the same relocata- 
bility attributes; that is, they 
appear in the same control section in 
this assembly (see "Program Sectioning 
and Linking," in Section 3). Each 
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pair must consist of terms with oppo- 
site signs. The paired terms do not 
have to be contiguous, for example, 
RT+AT-RT. 

3. No relocatable term may enter into a 
multiply or divide operation. RT-RT* 
10 is invalid; (RT-RT)*10 is valid. 

The pairing of relocatable terms (with 
opposite signs and the same relocatability 
attribute) cancels the effect of reloca- 
tion. Therefore, the value represented by 
the paired terms remains constant, regard- 
less of program relocation. For example, 
in the absolute expression A-Y+X, A is an 
absolute term, and X and Y are relocatable 
with the same relocatability attribute. If 
A equals 50, Y equals 25, and X equals 10, 
the value of the expression would be 35. 
It X and Y are relocated by a factor of 
100, their values would then be 125 and 
110, However, the expression would still 
be evaluated as 35 (50-125+110=35) . 

The following examples illustrate abso- 
lute expressions. A is an absolute term; X 
and y are relocatable terms with the same 
relocatability attribute. 

A-Y + X 

A 

A*A 

X-Y+A 

*-Y (A reference to the location counter 
must be paired with another relocat- 
able term from the same control sec- 
tion, that is, with the same relo- 
catability attribute.) 

Note that paired relocatable expressions 
cannot be successfully used in certain 
macro language statements of this book. 
In macro language, conditional or branch- 
ing statements, such as AIF, SETA, and 
SKTB statements, determine which of 
several desired, pre-stored lines of 
source code will be included in an 
assembled program. Since macro expan- 
sion (generation of these selected source 
code statements into a program) takes 
place prior to the assignment of loca- 
tion counter values, a paired relo- 
catable expression in a conditional macro 
language statement will not have been 
resolved into an absolute expression. 

Relocatable Expressions : The value of a 
relocatable expression would change by n if 
the program in which it appears is relo- 



cated n bytes away from its originally 
assigned area of storage. All relocatable 
expressions must have a positive value. 



A relocatable expression may be a relo- 
catable term and it may contain relocatable 
terms, alone or in combination with abso- 
lute terms, under these conditions: 



There must be an odd number of relo- 
catable terms. 



All the relocatable terms but one must 
be paired (described in "Absolute 
Expression," above). 



The unpaired term must not be directly 
preceded by a minus sign. 



4. No relocatable term may enter into a 
multiply or divide operation. 

A relocatable expression reduces to the 
single relocatable value of the odd relo- 
catable term, adjusted by the values repre- 
sented by the absolute terms and/or paired 
relocatafcle terms associated with that 
value. The relocatability attribute is 
that of the odd relocatable term. 

For example, in W-X-t-W-10, W and X are 
relocatable terms with the same relocata- 
bility attribute. If initially, W equals 
10 and X equals 5, the value of the expres- 
sion is 5. However, upon relocation this 
value will change. If a relocation factor 
of 100 is applied, the value of the expres- 
sion is 105. Note that the value of the 
paired terms W-X remains constant at 5 
regardless of relocation. Thus, the new 
value of the expression, 105, is the result 
of the value of the odd term (W) adjusted 
by the values of W-X and 10. 

The following examples illustrate relo- 
catable expressions. A is an absolute 
term, W and X are relocatable terms with 
the same relocatability attribute, and Y is 
a relocatable term with a different relo- 
catability attribute. 



Y-32*A W-X+* 

W-X+Y 

* (reference to 

location counter) 



=F , 123<* f (literal) 
A*A+W-W+Y 

w-x+w 

Y 



1*4 
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ADDRESSING 

The address! nq technique requires 
the* use of a base register, which contains 
t. he* base address, and a displacement, 
which is added to the contents of the base 
register. The programmer may specify a 
symbolic address and request the assem- 
bler to determine its storage address in 
terms of a base register and a displace- 
ment • The programmer may rely on the as- 
sembler to perform this service for him by 
indicating which general registers are 
available for assignment, and what values 
the assembler may assume that each con- 
tains. The programmer may use as many or 
as few registers for this purpose as he 
desires. The only requirement is that, at 
the point of reference, a register contain- 
ing an address from the same control sec- 
tion is available, and that this address is 
less than or equal to the address of the 
item to which the reference is being made. 
The difference between the two addresses 
may not exceed **095 bytes. 



ADDRESSES — EXPLICIT AND IMPLIED 

An address is composed of a displacement 
plus the contents of a base register. CIn 
the case of RX instructions, the contents 
of an index register are also used to 
derive the address.) 



instruction statements, leaving the assign* 
irent of base registers and the calculation 
of displacements to the assembler. 



To use symbols in the operand field of 
machine instruction statements, the pro- 
grammer must: (a) indicate to the assem- 
bler, by a USING statement, that one or 
acre general registers are available for 
use as base registers, Cb) specify, by the 
USING statement what value each base regis- 
ter contains, and Cc) load each base regis- 
ter with the value he has specified for it. 



If implicit addressing is desired, a 
program must have at least one USING state- 
ment for each control section to be 
addressed. 



The assembler's determination of base 
registers and displacements relieves the 
programmer of separating each address into 
a displacement value and a base address 
value. This feature of the assembler will 
eliminate a likely source of programming 
errors, thus reducing the time required to 
check out programs. To take advantage of 
this feature, the programmer uses the USING 
and DROP instructions described in this 
subsection. The principal discussion of 
this feature follows the descriptions of 
both instructions. 



The programmer writes an explicit 
address by specifying the displacement, and 
the base register number. In designating 
explicit addresses, a base register must 
not be combined with a relocatable symbol. 



He writes an implied address by specify- 
ing an absolute or relocatable address. 
The assembler has the facility to select a 
base register and compute a displacement, 
thereby generating an explicit address from 
an implied address, provided that the as- 
sembler has been informed: (a) what base 
registers are available to it, and (b) what 
each contains. The programmer conveys this 
information to the assembler through the 
USING and DROP instructions. 



BASE REGISTER INSTRUCTIONS 

The USING and DROP instructions enable 
programmers to use expressions representing 
implied addresses as operands of machine 



USING — Use Base Address Register 

This instruction indicates that one or 
store general registers are available for 
use as base registers. Also, this instruc- 
tion states the base address values that 
the assembler may assume will be in the 
registers at object time. Note that USING 
does not load the specified registers; it 
is the programmer's responsibility to see 
that the base address values are placed 
into the registers. Suggested loading 
methods are described in the subsection 
•Programming With the USING Instruction," 
below. The format of the USING statement 
iss 



r t~ t 

[Name (Operation (Operand 



| Blank | USING 
I I 
i 1 

L A 



i 



JFrom 2-17 expressions of j 
| the form j 

Iv,rl f r2,r3,. . . , r!6 | 

-A . . . J 
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Operand v roust be an absolute or relo- 
catable expression specifying a value that 
the assembler can use as a base address (no 
literals are permitted). The other 
operands must be absolute expressions. 
Operand rl specifies the general register 
that can be assumed to contain the base 
address represented by operand v. Operands 
r2, r3 t rH € ... specify registers that can 
be assumed to contain v***096 # v+8192, v* 
12288 # . .., respectively. The values of 
operands rl, r2 f r3, ... f rl6 must be 
between and 15. For example 9 the 
statement 



DROP — Drop Base Register 

The DROP instruction, specifying a pre- 
viously available register that may no 
longer be used as a base register, has this 
format: 



r T T . 1 

| Name | Operation | Operand ( 

l — + ~ + 4 

| Blank | DROP |Up to 16 absolute expres- | 
I j jsions of the form rl f r2 f | 
| j |r3 f ... f rl6 f or blank j 



r ^ T . : 1 

| Name (Operation (Operand | 

j. + + 4 

| (USING (*, 12, 13 | 

L L . A_. . . . . J 



tells the assembler it may assume that the 
current value of the location counter will 
be in general register 12 at object time, 
and that the current value of the location 
counter, incremented by 4096, will be in 
general register 13 at object time. 



The expressions indicate general regis- 
ters previously named in a USING statement 
that are now unavailable for base addres- 
sing. A blank operand field indicates that 
all registers previously defined as base 
registers are now unavailable for addres- 
sing. This statement, for example, pre- 
vents the assembler from using registers 7 
and 11: 



r T T 

| Name | Operation | Operand 
H + + 

| (DROP |7,11 

t X JL . 



If the programmer changes the value in a 
base register currently being used and 
wishes the assembler to compute displace- 
nent from this value, the assembler must be 
told the new value by means of another 
USING statement. In the following 
sequence, the assembler first assumes that 
the value of ALPHA is in register 9? the 
second statement causes the assembler to 
assume that ALPHA* 1000 is the value in reg- 
ister 9. 



r T . — T . 

| Name | Opera t ion | Opera nd 
\ +-- 



(USING j ALPHA, 9 

I- I 

1- 1 

( USING j ALPHA+1000 , 9 

>JL . -X~ . 



When a USING 
register as a 
bier places sub 
less than 4096 
and uses for 
This process is 
base register. 
TSS will not ac 
ter f but will 
value. The use 
general registe 



statement specifies general 
base register, the assem- 
sequent effective addresses 
in the displacement field, 
the base register field. 
the same as for any other 
Note that the hardware of 
tually reference regis- 

use zero quantity as a base 
r should not attempt to use 
r as a base register. 



It is not necessary to use a DROP state- 
ment when the base address in a register is 
changed by a USING statement, nor are DROP 
statements needed at the end of the source 
program. A register made unavailable by a 
DROP instruction can be made available 
again by a subsequent USING instruction. 



Note s If a comment is desired on a DROP 
statement which has no operands, a comma 
must be used to signify the missing 
operand. 



PROGRAMMING WITH THE USING INSTRUCTION 

The USING and DROP instructions may be 
used anywhere in a program, as often as 
needed, to indicate the general registers 
that are available for use as base regis- 
ters, and the base address values the as- 
sembler may assume each contains at execu- 
tion time. Whenever an address is speci- 
fied in a machine instruction statement, 
the assembler determines whether there is 
an available register containing a suitable 
base address. A register is considered 
available for a relocatable address if it 
was loaded with a relocatable value that is 
in the same control section as the address. 
The base address is considered suitable 
only if it is less than or equal to the 
address of the item to which the reference 
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is made. The difference between the two 
addresses may not exceed 4095 bytes • In 
calculating the base register to be used, 
the assembler will always use the available 
register giving the smallest displacement, 
if there are two registers with the same 
value, the highest numbered register will 
be chosen. 



If operand v of a USING statement speci- 
fies an absolute value, the assembler will 
use the associated base registers only for 
operands with absolute values. In the 
absence of a base register containing a 
suitable absolute value, an operand with an 
absolute value less than **096 will be 
placed directly in the displacement field 
of the assembled instruction. Thus, for 
example, a base register does not have to 
be explicitly stated for the operands of 
shift-type instructions. The programmer is 
tMutioned, however, that in TSS any virtual 
storage references derived from absolute 
v.-jIuos will be references to an area of 
virtual storage that is reserved for use 
by the system monitor. 



r T — _ T . , — 1 

| Name | Operation! Operand | 

(BEGIN (BASR |2,0 
| (USING |*,2 
| FIRSTJ . j 

1 I- 1 

1 I.AST j . j 

| | END (BEGIN 

L L _X . . 



In the preceding sequence, the BASR 
instruction loads register 2 with the 
address of the first storage location imme- 
diately following. In this case, it is the 
address of the instruction named FIRST. 
The USING instruction indicates to the as- 
sembler that register 2 contains this loca- 
tion. When employing this method, the 
USING instruction must immediately follow 
the BASR instruction. No other USING or 
load instructions are required if the loca- 
tion named LAST is within 4095 bytes of 
FIRST. 



The BASR and LM instructions in Figure 3 
load registers 2-5. The USING instruction 
indicates to the assembler that these regi- 
sters are available as base registers for 
addressing a maximum of 16,381 consecutive 
bytes of storage, beginning with the loca- 
tion named HERE. The number of addressable 
bytes may be increased or decreased, alter- 
ing the number of registers designated, by 
the USING and LM instructions and the num- 
ber of address constants specified in the 
DC instruction. 



f T T . 1 

(Name (Operation (Operand | 

j. + + ^ 

(BEGIN (BASR (2,0 

| (USING | HERE, 2, 3, l*, 5 

j HERE | LM (3,5, BASEADDR 

| | B j FIRST 

| BASEADDR (DC ( A ( HERE<H*096 , 

| | | HERE*8192,HERE*12288) 

(FIRST |. ( 

I I- I 

| LAST | . | 

| (END (BEGIN 

Figure 3. Multiple Base Register 
Assignment 



RELATIVE ADDRESSING 

This is the technique of addressing 
instructions and data areas by designating 
their location in relation to the location 
counter or to some symbolic location. This 
type of addressing is always in bytes, 
never in bits, words, or instructions. 
Thus, the expression **4 specifies an 
address that is four bytes greater than the 
current value of the location counter. In 
the sequence of instructions shown in the 
following example, the location of the CR 
rrachine instruction can be expressed in two 
ways, ALPHA* 2 or BETA- 4, because all the 
mnemonics in the example are for 2-byte 
instructions in the RR format. 



r T T — 

| Name | Operation | Operand 

|ALFHA|LR |3,<» 

I |CR |**,6 

| |BCR jl ,14 

I BETA JAR (2,3 

l JL JL_ 



PROGRAM SECTIONING AND LINKING 

It is often convenient, or necessary, to 
write a large program in sections. The 
sections may be assembled separately, then 
combined into one object program. The as- 
sembler provides facilities for creating 
nrultisectioned programs and symbolically 
linking separately assembled programs or 
program sections. 

Sectioning a program is optional, and 
many programs can best be written without 
sectioning them. The programmer writing an 
unsectioned program need not concern him- 
self with the subsequent discussion of pro- 
gram sections, which are called control 
sections. He need not employ the CSECT 
instruction, which is used to identify the 
control sections of a multisection program. 
Similarly, he need not concern himself with 
the discussion of symbolic linkages, if his 
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program neither requires a linkage to nor 
receives a linkage from another program. 
He may, however, wish to identify the pro- 
gram and/or specify a tentative starting 
location for it, both of which may be done 
by using the START instruction. He may 
also want to employ the dummy section fea- 
ture obtained by using the DSECT 
instruction. 

Nc lL^ : Program sectioning and linking is 
clone*] y related to the specification of 
base registers for each control section. 
iicct ioning and linking examples are pro- 
vided in this section under "Addressing 
External control Sections." 



CONTROL SECTIONS 

The concept of program sectioning is a 
consideration at coding time, assembly 
time, and load time. To the programmer, a 
program is a logical unit. He may want to 
divide it into sections called control sec- 
tions; if so f he writes it in such a way 
that control passes properly from one sec- 
tion to another, regardless of the relative 
physical position of the sections in 
storage- A control section is a block of 
coding whose virtual storage location 
assignments can be adjusted, independently 
of other coding, during linkage or loading 
without altering or impairing the operating 
logic of the program. A control section is 
normally identified by the CSECT, PSECT, or 
COM assembler instructions. 

To the assembler there is no such thing 
as a program; instead, there is an assem- 
bly, which consists of one or more control 
sections. (However, the terms assembly and 
program are often used interchangeably.) 
An unsectioned program is treated as a 
single control section. To the linkage 
editor there are no programs, only control 
sections that must be fashioned into an 
object program. 

The output of the assembler consists of 
the assembled control sections and a con- 
trol dictionary. The control dictionary 
contains information that the linkage edi- 
tor and the loader need to complete cross- 
referencing between control sections, as it 
combines them into an object program. The 
linkage editor and the loader can take con- 
trol sections from various assemblies and 
combine them properly, with the help of the 
corresponding control dictionaries. Suc- 
cessful combination of separately assembled 
control sections depends on the technigues 
used to provide symbolic linkages between 
the control sections. 

Regardless of the degree to which his 
program is sectioned, the programmer still 
knows the elements that comprise his virtu- 



al storage, because he has described them 
symbolically. He cannot, however, make any 
assumptions about the position or ordering 
of control sections, since their virtual 
storage location assignments may have been 
adjusted by the linkage editor or the load- 
er, and their physical storage addresses 
may be constantly changing within the time 
sharing environment. 

Control Section location Assignment 

Control section contents can be written 
in an intermixed manner because the assem- 
bler provides a location counter for each 
control section. Virtual storage locations 
are assigned consecutively within each con- 
trol section, beginning at 0. The order in 
which different control sections appear in 
the assembly does not imply a similar order 
of program execution. 



FIRST CONTROL SECTION OF PROGRAM 

Normally, this contains the literals 
reguested in the program, although their 
positioning can be altered. (Further 
explanation is in the discussion of the 
LTORG assembler instruction, below.) 

START — Start Assembly 

The START instruction may be used to 
give a name to the first Cor only) control 
section of a program! only one START 
instruction may be in an assembly. Also, 
it may be used to specify the initial vir- 
tual storage location counter value for the 
first control section. The START format 
is: 

(Name (Operation (Operand | 

(A symbol | START |A self-defining term | 
| or blank | |or blank j 

i . — j — . x . . _j 

If a symbol names the START instruction, 
the symbol is established as the name of 
the control section; if not, the control 
section is considered to be unnamed. All 
subsequent statements are assembled as part 
of that control section. The procedure 
continues until a different CSECT instruc- 
tion identifying a control section, or a 
DSECT, PSECT or COM, instruction is encoun- 
tered. A CSECT instruction named by the 
same symbol that names a START instruction 
is considered to identify the continuation 
of the control section first identified by 
the START. Similarly, an unnamed CSECT 
that occurs in a program initiated by an 
unnamed START is considered to identify the 
continuation of the unnamed control 
section. 
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The symbol in the name field is a valid 
relocatable symbol with a value that repre- 
sents the address of the first byte of the 
control section and with a length attribute 

of 1, 

The assembler uses the self-defining 
value specified by the operand as the 
starting value for the virtual storage 
location counter for the control section. 
The START instruction is, in effect, equiv- 
alent to a CSECT instruction followed by an 
org instruction. For example, either of 
these statements could be used to assign 
the name PROG2 to the first control section 
and to indicate an initial location counter 
value of 2040: 



When several CSECT statements with the 
same name appear within a program, the 
first is considered to identify the begin- 
ning of the control section; the rest iden- 
tify the resumption of the section. Thus, 
statements from different control sections 
may be interspersed. They are properly 
assembled (assigned contiguous storage 
locations) as long as the statements from 
the various control sections are identified 
by the appropriate CSECT instructions. 



The operand field may be used to assign 
attributes to the control section. Attri- 
butes of control sections are discussed 
later in this section. 



r T . T — , j 

(Name (Operation [Operand | 

t „ — + + 4 

1PROG2) START | 2040 | 

)PROG2| START jX^Fe* J 

L_ X — A J 

If the operand is omitted, the assembler 
sets the initial value of the location 
counter to 0. The location counter is set 
at the next doubleword boundary when the 
value of the START operand is not divisible 
Jby 8. 

Note ; The START instruction may not be 
preceded by any assembler language state- 
ment that affects or depends on the setting 
of the location counter. 



Unnamed Control Section 

The assembler will produce an unnamed 
control section if it encounters certain 
statements before any type of control sec- 
tion statement C CSECT, PSECT, COM, or 
DSECT) is encountered. The statements for 
which this will be done are those which 
assume that a location counter value is 
available. Such statements are: 

1. Machine operation instructions 

2. Macro instructions (but not instruc- 
tions within macro definitions) 

3. CCW 



CSECT — Identify Control Section 

The CSECT instruction identifies the 
beginning or the continuation of a control 
sect ion # in this format: 



r T — . T . ^ 

| Name | Operation | Operand J 

j A symbol | CSECT (One or more attribute j 
[or blank I j names, or blank j 

If a symbol names the CSECT instruction, 
the symbol is established as the name of 
the control section; otherwise, the section 
is considered to be unnamed. All state- 
ments following the CSECT are assembled as 
part of that control section until a state- 
ment identifying a different control sec- 
tion (another CSECT, PSECT, COM or DSECT 
instruction) is encountered. 



The symbol in the name field is a valid 
relocatable symbol with a value that repre- 
sents the address of the first byte of the 
control section and with a length attribute 

of 1. 



4. CNOP 

5. CXD 

6. DC, DS, and ORG 

7. EQU 

8. USING and DROP 

9 . LTORG 

10. END 

11. ENTRY 

If an unnamed CSECT is not wanted, then the 
above statements should follow a CSECT, 
PSECT, COM, or DSECT instruction. 



There can be only one unnamed control 
section in a program. If one is initiated 
and is then followed by a named control 
section, any subsequent unnamed CSECT sta- 
tements are considered to resume the 
unnamed control section. If a programmer 
wants to write a small program that is 
unsectioned, the program need not contain a 
CSECT instruction. 
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DSECT 



Identify Dummy Section 



A dummy section represents a contrpl 
section that is , assembled but is not part 
of the object program, A dummy section is 
a convenient means of describing the layout 
of a storage area without actually reserv- 
ing the storage. (It is assumed that the 
storage is reserved either by some other 
part of this assembly or by another assem- 
bly.) The DSECT instruction identifies the 
beginning or resumption of a dummy section. 
More than one dummy section may be defined 
per assembly, but each must be named. This 
is the format of the DSECT instruction 
statement s 



r _ „ T _ . T _. -1 

(Name (Operation) Operand | 

| A symbol J DSECT (Not*used; should be | 
I | | blank | 

l- A J. . J 



The symbol in the name field is a valid 
relocatable symbol with a value that repre- 
sents the first byte of the section and 
with a length attribute of 1. 

Program statements belonging to dummy 
sections may be interspersed throughout the 
program or may be written as a unit. In 
either case, the appropriate DSECT instruc- 
tion should precede each set of statements. 
When multiple DSECT instructions with the 
same name are encountered, the first is 
considered to initiate the dummy section, 
and the rest to continue it. 

Symbols that name statements in a dummy 
section may be in USING instructions. 
Therefore, they may be used in program ele- 
ments (for example, machine instructions 
and data definitions) that specify storage 
addresses. An example illustrating the use 
of a dummy section appears under "Addres- 
sing Dummy Sections," below. 



Note: A symbol that names a statement in a 
dummy section may be used in an A-type 
address constant only if it is paired with 
another symbol (with the opposite sign) 
from the same dummy section. 



ADDRESSING DUMMY SECTIONS i The programmer 
iray wish to describe the format of an area 
whose storage location will not be deter- 
mined until the program is executed- He 
can describe the format of the area in a 
dummy section, and he can use symbols 
defined in the dummy section as the 
operands of machine instructions. To 
effect references to the storage area, he 
does the following: 



1. Provides a USING statement that speci- 
fies: (a) a general register that the 
assembler can assign to the machine 
instructions as a base register, and 
(b) a value from the dummy section 
that the assembler may assume the reg- 
ister contains. 



2. Ensures that the same register is 

loaded with the actual address of the 
storage area. 

The value assigned to symbols defined in 
a duirmy section are relative to the initial 
statement of the section. Thus, all 
machine instructions which refer to names 
defined in the dummy section will, at 
execution time, refer to storage locations 
relative to the address loaded into the 
register* 

An example is shown in the coding below. 
Assume that two independent assemblies (as- 
sembly 1 and assembly 2) have been loaded 
and are to be executed as one overall pro- 
gram. Assembly 1 is an input routine that: 
(a) places a record in a specified storage 
area, (b) places the address of the input 
area containing the record in general reg- 
ister 3, and (c) branches to assembly 2. 
Assembly 2 processes the record. The cod- 
ing shown in the example is from assembly 
2. 

The input area is described in assembly 
2 by the DSECT control section named 
INAREA. Portions of the input area (that 
is, record) that the programmer wishes to 
work with are named in the DSECT control 
section, as shown. The assembler instruc- 
tion USING INAREA, 3 designates general reg- 
ister 3 as the base register to be used in 
addressing the DSECT control section. Gen- 
eral register 3 is assumed to contain the 
address of INAREA. 



DUMMY SECTION LOCATION ASSIGNMENT ; A loca- 
tion counter is used to determine the rela- 
tive locations of named program elements in 
a dummy section. The location counter is 
always set to at the beginning of the 
dummy section; the location values assigned 
to symbols that name statements in the 
dummy section are relative to the initial 
statement in the section. 



Assembly 1, during execution, loads the 
actual beginning address of the input area 
in general register 3. Because the symbols 
used in the DSECT section are defined rela- 
tive to the initial statement in the sec- 
tion, the address values they represent 
will, at the time of program execution, be 
the actual storage locations of the input 
area. 
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r 

| Name 

I 

| ASMBLY 2 

[begin 



| Operation j Operand 



IATYPE 



|WORKA 
IWORKB 



INAREA 
INCODE 

| INPUTA 
INPUTB 



[CSECT 

JBASR 
USING 



[USING 
(CLI 

I BE 



|MVC 
IMVC 



|DS 

IDS 



[DSECT 

|DS 
|DS 
|DS 

I END 



12.0 
♦,2 



| INAREA, 3 
IINCODE^'A' 

IATYPE 



[WORK A, INPUTA 
(WORKB, INPUTB 



|CL20 
ICL18 



|CL1 

|CL20 

ICL18 



The operand field may be used to assign 
attributes to a common section. Attributes 
of control sections are discussed later in 
this section. 



l 



com — Define Common Control Sections 

The COM assembler instruction identifies 
and reserves common areas of storage that 
may be referred to by independent assemb- 
lies that have been linked and/or loaded 
tor execution as one overall program* 
Appearance of another COM statement after 
the initial one indicates resumption of the 
previously defined blank or named common 
control section. One blank and any number 
of named common control sections can be 
designated in an assembly. The format is: 



(Name (Operation (Operand j 

f + + 4 

(Symbol (COM |One or more attributes) 
(or blank) for blank | 

l JL X . . 1 

The common area may be broken up into 
subfields through use of the DS and DC as- 
sembler instructions. Names of subfields 
are defined relative to the beginning of 
the common section, as in the DSECT control 
section. 

No instructions or constants are 
assembled in the blank common control sec- 
tion. Data can be placed there only 
through execution of the program. Instruc- 
tions and constants can be assembled in 
named common control sections. The rules 
governing the final structure of common 
control sections are described in Linkage 
Editor. 



(Name 

k 

ASMBLX3 
BEGIN 



* 
NEWPG 



* 
MVLINE 



INAREA 
INCODE 
INPUTA 
INPUTB 

PRCTL 

OUTPUTA 

OUTPUTB 

* 

NAMED 
TITLE 
BLANKS 



•T — 



| Operation | Operand 



CSECT 

BASR 

USING 

USING 

USING 

USING 



MVC 
MVC 
MVI 



CLI 
BE 



MVC 
MVC 
MVI 



DSECT 
DS 
DS 
DS 



COM 
DS 
DS 
DS 



COM 

DC 
DC 
END 

X 



PUBLIC, READONLY 

1,0 

♦,1 

INAREA, 2 
PRCTL, 3 
NAMED,!* 



CUTPUTB, TITLE 
CUTPUTA, BLANKS 
PRCTL, C - l f 



INCODE, C'E 1 
MVLINE 



OUTPUTA , INPUTA 
OUTPUTB , INPUTB 
PRCTL, C • 



CLI 

CL20 

CL14 



CLI 

CL20 

CL1*» 



CLI H f ERROR MESSAGES* 

CL20 - • 

BEGIN 



PSECT — Define Prototype Control Section 

Within TSS, a single copy of a com- 
monly used, reenterable routine will 
appear to have different virtual storage 
location assignments to different users, 
although its physical disposition in 
storage remains unchanged. When control 
is transferred to a reenterable routine, 
the calling program must supply an address 
constant which reflects the virtual storage 
assignments of the calling program, so the 
reenterable routine may obtain data storage 
that is unique to the user. 

This would ordinarily imply that a pro- 
gram that calls a reenterable routine knows 
all address constants which might be 
required within the hierarchy of reenter- 
able programs. To minimize this clerical 
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burden, a prototype control section is 
defined for use by reenterable programs to 
simplify the handling of address constants 
and working storage. The format is: 



r ._ T . T . — . 1 

| Name [ Operation | Operand | 

L .. + + 4 

I A eyrobol| PSECT (One or more attribute | 
I I j names 9 or blank | 

t. x jl . . J 



The contents of a prototype section are 
identical in every respect with those of a 
control section (CSECT). However, on link- 
age to the reenterable routine, a copy of 
the contents of the prototype section is 
made and then assigned to virtual storage 
locations within the domain of the calling 
program. 

A reenterable program is then free to 
assemble ail its working storage and 
address constants within a prototype sec- 
tion, and the user need not know any of the 
internal requirements of the routine he 
calls. 

Communication of prototype section 
information is accomplished through use of 
the R-type address constant (see Section 

b) . 

The operand field may be used to assign 
attributes to a prototype section. 



EXTERNAL DUMMY SECTIONS 



characteristic of the data or instructions 
within a control section. One or more of 
the following operands may be used in 
CSECT f PSECT, or COM statements to indicate 
which attributes are to be assigned to the 
sections 

PUBLIC - Section contains shared pub- 
lic data or instructions. 

READONLY - Section contains instructions 
or data that are never 
modified. 

VARIABLE - Length of section may vary 
during program execution. 

PRVLGD - when section is assigned 

space by loader, a protection 
key is to be assigned to it; 
only privileged system ser- 
vice routines have read or 
write access to it. 

SYSTEM - Section may contain entry 

points to system subroutines 
whose entry point names begin 
with SYS. 

Attributes may be specified singly or in 
combination, where meaningful. If a sec- 
tion is interrupted and resumed, as 
described above under CSECT, the final set 
of attributes for the section is determined 
by combining the attributes which appear on 
each of the various CSECT, PSECT, or COM 
statements. If no attributes are speci- 
fied, the section is defined as a standard 
control, prototype, or common section. 



External dummy sections allow the pro- 
grammer to define work area requests for 
several different programs and, at execu- 
tion time, combine these requests into one 
block of storage accessible to each pro- 
gram, several different programs may be 
assembled together, each with one or more 
external dummy sections. After the loader 
has processed these programs, the program- 
mer, having issued a GETMA1N macro instruc- 
tion, can dynamically allocate storage for 
the dummy sections in one block. External 
dummy sections are defined through the use 
of a Q-type DC instruction in combination 
with a DXD or a DSECT instruction. In or- 
der to allocate the correct amount of 
storage when the program is executed, the 
programmer must use the CXD instruction, 
described in Section 5, within one of the 
programs • 



ATTRIBUTES OF CONTROL SECTIONS 

To facilitate dynamic linkage and load- 
ing within TSS, it is often necessary to 
indicate that certain attributes are 



SYMBOLIC LINKAGES 

Symbols may be defined in one program 
and referred to in another, thus effecting 
symbolic linkages between independently 
assembled programs. The linkages can be 
effected only if the assembler is able to 
provide information about the linkage sym- 
bols to the dynamic loader, which resolves 
these linkage references at load time. The 
assembler places the necessary information 
in the control dictionary on the basis of 
the linkage symbols identified by the ENTRY 
and EXTRN instructions. Note that these 
symbolic linkages are described as linkages 
between independent assemblies; more spe- 
cifically, they are linkages between inde- 
pendently assembled control sections. 

In the program where the linkage symbol 
is defined (i.e., used as a name), it must 
also be identified to the assembler by the 
ENTRY assembler instruction. It is identi- 
fied as a symbol that names an entry point, 
which means that another program will use 
that symbol to effect a branch operation or 
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<% (lata reference. The assembler places 
this information in the control dictionary. 

Similarly, the program that uses a sym- 
bol defined in some other program must 
identify it by the EXTRN assembler instruc- 
i ion. It is identified as an externally 
defined symbol (that is, defined in another 
program) that is used to effect linkage to 
the point of definition. The assembler 
places this information in the control 
di ctionary. 

Another way to obtain symbolic linkages 
js by using the V-type address constant. 
"Data Definition Instructions" in section 5 
contains the details pertinent to writing a 
v-type address constant. It is sufficient 
here to note that this constant may be con* 
sidered an indirect linkage point. It is 
created from an externally defined symbol, 
but that symbol does not have to be identi- 
fied by an EXTRN statement. The V-type 
address constant may be used for external 
branch references (that is # for effecting 
branches to other programs) or for external 
data references. 



ENTRY 



Identify Entry Point Symbol 



The entry instruction identifies linkage 
symbols that are defined in this program 
but may be used by some other program. The 
length attribute of an external symbol is 
1. The format of the ENTRY instruction 
statement is: 



r T — . T . 

| Name (Operation J Operand 



| Blank | ENTRY 
1 I 
I i 
I I 



I 



! 

~H 

| One or more relocatable | 

| or absolute symbols, j 
(separated by commas, that) 
| also appear as statement | 
| names j 



The symbols in the ENTRY operand field 
may be used as operands by other programs. 
An ENTRY statement operand may not contain 
a symbol defined in a dummy section. The 
following example identifies the statements 
named SINE and COSINE as entry points to 
the program. 

r _. T T . 1 

[Name (Operation (Operand | 

| (ENTRY | SINE, COSINE I 

L „JL X . . i 

If the ENTRY statement appears within a 
named CSECT, PSECT, or named common sec- 
tion, all the operands appearing in the 
ENTRY statement are associated with the 
name of the section. These entry names may 
then be referenced with R-type address con- 
stants in other programs. 



Note ; The ENTRY statement may not appear 
in a DSECT, unnamed common section, or an 
unnamed control section. 

Note : The name of a control section cannot 
be identified by an ENTRY instruction. The 
assembler automatically places information 
on control section names in the control 
dictionary. Multiple declarations of the 
same ENTRY name, either through duplicate 
ENTRY statements or duplication of an 
operand within an ENTRY statement, do not 
cause multiple definitions to be entered in 
the output program module. 

Note : An operand of an ENTRY statement 
must appear in the name field of another 
statement; however, a symbol declared in an 
ENTRY statement may not be the name of an 
EQU statement if the EQU contains an 
externally defined symbol in its operand 
field. Under this rule, the following code 
is incorrect: 



(Name (Operation (Operand 



(ENTRY JA 
| (EXTRN IX 
|A |EQU |X 



EXTRN — Identify External Symbol 

The EXTRN instruction identifies linkage 
symbols that are used by this program but 
defined in some other program. Each 
external symbol must be identified; this 
includes symbols that name control sec- 
tions. The length attribute of an external 
symbol is 1. This is the format of the 
EXTRN instruction statement: 



Name j Operation j Operand 
4 + 



I 



Blank j EXTRN 



I 






4 

(One or more relocatable | 
1 symbols, separated by | 
I commas | 



The symbols in the operand field may not 
appear as names of statements in this pro- 
gram. The following example identifies 
three external symbols that have been used 
as operands in this program but are defined 
in some other program. 



"T- 



| Name j Operation | Operand | 

| | EXTRN |RATEBL,PAYCALC,WITHCALC [ 

An example that employs the EXTRN 
instruction appears under "Addressing 
External control Sections," below. 



Section 3: Addressing — Program Sectioning and Linking 23 



Notes: 



(1) 



Symbols appearing in the operand 
field of a v-type or R-type address 
constant need not be defined by an 
EXTRN statement. 



(2) When external symbols are used in an 
expression, they may not be paired; 
each must be considered as having a 
unique relocatability attribute. 

Addressing External control Sections 

A common way for a program to link to an 
external control section is to: 

1. Create a V-type address constant with 
the name of the external symbol. If 
the external control section is reen- 
terable, create an R-type constant 
with the name of the external symbol. 

2. Load the constants into general regis- 
ters and branch to the control sec- 
tion, via the register containing the 
V-type address constant. 

For example, to link to the control sec- 
tion named SINE, this coding might be used: 



Loads the constant into a general reg- 
ister and uses the register for base 
addressing. 



For example, to use an area named 
RATETBL f which is in another control sec- 
tion, this coding might be used: 



r 

(Name 



j Operation j Operand 



MAINPROG|CS£CT 
BEGIN | BASR 

| USING 

I* 

I- 
(EXTRN 

I- 
I- 
(L 
| USING 



RATEADDRJDC 
(END 



I 

12,0 

1*,2 

I 

I 

| RATETBL 

I 

I 

[4,RATEADDR 

j RATETBL, 4 
| 3, RATETBL 



j A (RATETBL) 
| BEGIN 



— H 



j Name | Ope rat ion j Operand 

MAINPROG|CSECT 
BEGIN | BASR 

(USING 

I- 

I- 

|L 
(BASR 



(2,0 
I*. 2 



|13,RCON 
|15,VCON 
(1<*,15 



RCON 
VCON 



(DC 
| DC 
(END 
A 



I R (SINE) 
|V(SINE) 
| BEGIN 






To use an external symbol naming data, 
the programmer: 

1. Identifies the external symbol with 
the EXTRN instruction and creates an 
address constant from the symbol. 



Alternatively, a V-type address constant 
may be used to refer to externally named 
data: 



r — r r 

| Name | Operat ion | Operand 



MAINPROGJCSECT | 

BEGIN | BASR | 2, 

(USING (*, 2 

I- t 

I- 

|L 

(USING 

|A 

I- 

I- 
RATEADDRJDC 

RATETAB (DSECT 

RATE | DS 

| END 



|H,RATEADDR 
(RATETAB, 4 
| 3, RATE 
I 

I 

( V( RATETBL) 

I 

IF 

| BEGIN 
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SECTION 4: MACHINE INSTRUCTIONS 



This section discusses coding of the 
machine instructions represented in the as- 
sembler language. The functions of each 
machine instruction are discussed in Prin- 
c iples of Operation . 



Floating point instructions must spe- 
cify floating point registers 0, 2, 4, 
or 6. 

Double-shift, fullword multiply, and 
divide instructions must specify an 
even-numbered general register in the 
first operand. 



MACHINE INSTRUCTION STATEMENTS 



OPERAND FIELDS AND SUBFIELDS 



Machine instructions may be represented 
symbolically as assembler language state- 
ments • The symbolic format of each varies 
according to the actual machine instruction 
format, of which there are five: RR f RX, 
RS, SI, and SS. Within each basic format, 
further variations are possible. 

The symbolic format of a machine 
instruction is similar to, but does not 
duplicate, its actual format. A mnemonic 
operation code is written in the operation 
field; one or more operands are written 
in the operand field. Comments may be 
appended to a machine instruction state- 
ment, as explained in Section 1. 



Any machine instruction statement may be 
named by a symbol that other assembler sta- 
tements can use as an operand. The value 
attribute of the symbol is the address of 
the leftmost byte assigned to the assembled 
instruction. The length attribute of the 
symbol depends on the basic instruction 
format : 



Basic Format 

RR 
RX 
BS 
SI 
SS 



Length Attribute 
2 
4 
4 
4 
6 



Instruction Alignment and Checking 

All machine instructions are aligned 
automatically by the assembler on halfword 
boundaries. If any statement that causes 
information to be assembled requires align- 
ment, the bytes skipped are filled with 
hexadecimal 0s. All expressions that spe- 
cify storage addresses are checked to 
ensure that they refer to appropriate boun- 
daries for the instructions in which they 
are used. Register numbers are also 
checked to make sure that they specify the 
proper registers: 



Some symbolic operands are written as a 
single field; other operands are written as 
a field followed by one or two subfields. 
For example, addresses consist of the con- 
tents of a base register and a displace- 
ment* An operand that specifies a base and 
displacement is written as a displacement 
field followed by a base register sufcfield, 
as 40(5), In the RX format, both an index 
register subfield and a base register sub- 
field are written as 40(3,5). In the SS 
format, both a length subfield and a base 
register subfield are written as 40(21,5). 

Two types of addressing formats for RX, 
RS, SI, and SS instructions are shown in 
Appendix B. In each case, the first type 
shows the method of specifying an address 
explicitly, as a base register and dis- 
placement. The second type indicates how 
to specify an implied address as an 
expression. 

For example, a load multiple instruction 
(RS format) may have either of these sym- 
bolic operands: 

R1,R3,D2(B2) - explicit address 
R1,R3,S2 - implied address 

While D2 and B2 must be represented by 
absolute expressions, S2 may be represented 
by either a relocatable or an absolute 
expression. 

To use implied addresses, these rules 
must be observed: 

1. The base register assembler instruc- 
tions (USING and DROP) must be used. 

2. An explicit base register designation 
must not accompany the implied 
address. 

For example, assume that FIELD is a 
relocatable symbol which has been assigned 
a value of 7400. Assume also that the as- 
sembler has been notified (by a USING 
instruction) that general register 12 cur- 
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rently contains a relocatable value of 4096 
and is available as a base register. The 
following example shows a machine instruc- 
tion statement as it would be written in 
assembler language and as it would be 
assembled. Note that the value of D2 is 
the difference between 7400 and 4096, and 
that x2 is assembled as f since it was 
omitted. The assembled instruction is pre- 
sented in hexadecimal: 



3. 



MVC 32(16,5) ,FIELD2 

MVC BETA(, 5), FIELD2 (implied 

length) 
L 2,48(,5) (omitted index register) 

If the second subfield in the sequence 
is omitted, the comma that separates 
it from the first subfield must be 
omitted; the parentheses must be 
written. 



Assembler statement : 

ST U, FIELD 
Assembled instruction: 



Op. 


Code Rl 


X2 


B2 


D2 


so 


4 





C 


CE8 



An address may be specified explicitly 
as a base register and displacement (and 
index register for RX instructions) by the 
iormats shown in the first column of Table 
1 . The address may be specified as an 
implied address by the formats shown in the 
second column. Observe that the two 
storage addresses required by the SS 
instruct ions are presented separately; an 
implied address may be used for one and an 
explicit address for the other. 

Table 1. Details of Address Specification 
r T T 1 

(Type | Explicit Address | Implied Address | 

4 



|RX 



M 

I 

|RS 

|SI 

|SS 

! 



[D2(X2,B2) 
!D2(0 f B2) 
(D2CB2) 
|D1(B1) 
|Dl(Ll t Bl) 
|D1(L,B1> 
|D2(L2 # B2) 
-X 



|S2(X2) 

|S2 

|S2 

|S1 

1SKL1) 

IS1(L> 

|S2(L2) 

-JL -. 



A comma must be written to separate 
operands. Parentheses must be written to 
enclose subfields, and a comma roust be 
written to separate two subfields within 
parentheses. When parentheses are used to 
enclose one subfield and the subfield is 
omitted, the parentheses must be omitted. 
In the case of two subfields that are 
separated by a comma and enclosed by paren- 
theses, these rules apply: 

1. If both subfields are omitted, the 
separating comma and the parentheses 
must also be omitted. 

L 2,48(4,5) 

L 2, FIELD (implied address) 

2. If the first subfield in the sequence 
is omitted, the comma that separates 
it from the second subfield is writ- 
ten; the parentheses must also be 
written. 



MVC 32(16 f 5) f FIELD2 
MVC FIELDK16) # FIELD2 (implied 
address) 

Fields and subfields in a symbolic 
operand may be represented either by abso- 
lute or by relocatable expressions, depend- 
ing on what the field requires. (An ex- 
pression is defined as consisting of one 
term or a series of arithmetically combined 
terms.) Refer to Appendix B for a detailed 
description of field requirements. 



Note: Blanks may not appear in an operand 
unless provided as characters in a charac- 
ter self-defining term or a character lit- 
eral; blanks may not intervene between 
fields and the comma separators, between 
parentheses and fields, etc. 



LENGTHS — EXPLICIT AND IMPLIED 

The length field in SS instructions can 
be explicit or implied. To imply a length, 
the programmer omits a length field from 
the operand. The omission indicates that 
the length field is either: 

1. The length attribute of the expression 
specifying the displacement, if an 
explicit base and displacement have 
been written. 

2. The length attribute of the expression 
specifying the effective address, if 
the base and displacement have been 
implied. 

In either case, the length attribute for 
an expression is the length of the leftmost 
term in the expression. 

By contrast, an explicit length is writ- 
ten by the programmer in the operand as an 
absolute expression. The explicit length 
overrides any implied length. 

Whether the length is explicit or 
implied, it is always an effective length. 
The value inserted into the length field of 
the assembled instruction is one less than 
the effective length in the machine 
instruction statement. 
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Note: If a length field of is desired, 
for use with an execute (EX) machine 
instruction, the length may be stated as 0. 

To summarize* the length required in an 
SS instruction may be specified explicitly 
by the formats shown in the first column of 
Table 2, or may be implied by the formats 
shown in the second column. Observe that 
the two lengths required in one of the SS 
instruction formats are presented separate- 
ly* An implied length may be used for one 
and an explicit length for the other. For 
the SS instruction format, which requires a 
single length field (L), the implicit 
length used is that of the first operand. 

Table 2. Details of Length Specification 
in SS Instructions 



j Explicit Length j 

t . + 

| D1(L1,B1) 

I SKL1) 

1 Dl(L f Bl> 

| SKL) 

| D2(L2,B2> 

| S2CL2) 



Implied Length J 

D1(,B1) 

SI 

D1(,B1) 

SI 

D2(,B2) 

S2 



MACHINE INSTRUCTION MNEMONIC CODES 

The mnemonic operation codes are 
easily remembered for indicating the 
functions of the instructions. The 
norma] format of the code is shown 
below; the items in brackets are not 
necessarily present in all codes: 

VerblModif ierl (Data Type) [Machine Format) 

The verb, which is usually one or two 
characters, specifies the function (A 
represents Add, and MV represents Move) . 
The function may be further defined by a 
modifier (modifier L indicates a logical 
function, as in AL for Add Logical). 

Mnemonic codes for functions involving 
data usually indicate the data types by 
letters that correspond to those for the 
data types in the DC assembler instruction 
(see Section 5), Furthermore, letters U 
and W have been added to indicate short and 
long unnormalized floating-point opera- 
tions, respectively. For example, AE indi- 
cates Add Normalized Short, whereas AU 
indicates Add Unnormalized Short. Where 
applicable, fullword fixed-point data is 
implied if the data type is omitted. 

The letters R and I are added to the 
codes to indicate, respectively, RR and SI 
machine instruction formats. Thus, AER 
indicates Add Normalized Short in the RR 
format. Functions involving character and 
decimal data types imply the SS format. 



MACHINE INSTRUCTION EXAMPLES 

The examples that follow are grouped 
according to machine instruction format. 
They illustrate the various symbolic 
operand formats. All symbols employed in 
the examples must be assumed to be defined 
elsewhere in the same assembly* Ail sym- 
bols that specify register numbers and 
lengths must be assumed to be equated else- 
where to absolute values. 

Implied addressing, control section 
addressing, and the function of the USING 
assembler instruction were considered, 
together with examples of coding sequences, 
earlier in this section, under "Program 
Sectioning and Linking" and "Base Register 
Instructions. " 



RR Format 



(Naiie 



— T- 



| + . 

fALPHAl |LR 



| Operation | Operand 



JALPHA2 
| BETA 
JGAMMA1 
(GAMMA2 



|LR 
JSPM 
| SVC 
| SVC 

-A 



|1,2 

|REG1,REG2 
|15 
|250 
(TEN 
-J — - 



The operands of ALPHA1, BETA, and GAMMA1 
are decimal self-defining values, which are 
categorized as absolute expressions. The 
operands of ALPHA 2 and GAMMA 2 are symbols 
that are equated elsewhere to absolute 
values. 



RX Format 



| Name | Operat ion | Operan d 



(ALPHA! 


|t 


IALPHA2 


|L 


|BETA1 


|L 


JBETA2 


1* 


(GAMMA1 


It 


(GAMMA2 


|t 


JGAMMA3 


|t 


1 LAMBDA1 

i 


It 



|1,39C4,10) 
JREG1, 39 (4, TEN) 
|2,ZETA(4) 
|REG2,ZETACREGa) 
|2,ZETA 
|REG2,ZETA 
|2,=F , 1000 i 
|3,20C0,5) 









Both ALPHA instructions specify explicit 
addresses; REG1 and TEH are absolute sym- 
bols. Both BETA instructions specify 
implied addresses, and both use index regi- 
sters* Indexing is omitted from the GAMMA 
instructions. GAMMA! and GAMMA2 specify 
implied addresses. Uie second operand of 
GAMMA3 is a literal. LAMB DAI specifies no 
indexing. 
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RS Format 



EXTENDED MNEMONIC CODES 



| Name 

H- 

jALPHAl 
| ALP HA 2 
JALPHA3 
|ALPI1A4 
| ALPHAS 



- T T . . 

| Operation ( Operand 
_ + + „„ 

|BXH (1,2,20(14) 
| BXH | REGl f REG2 , 20 (REGD) 
|BXH |REGl,REG2,ZETA 
|SLL |REG2,15 
|SLL |REG2,0(15) 
„X .. X. . . 



While ALPHA1 and ALPHA2 specify explicit 
addresses, ALPHA3 specifies an implied 
address. ALPHAS is a shift instruction, 
shifting the contents of REG2 left 15 bit 
ix^sitions. ALPHA5 is a shift instruction, 
shifting the contents of REG2 left by the 
value contained in general register 15. 



SI Format 






r ~ — 


T 


T . 


— -j 


(Name 


| Operation | Operand 


i 


I -~ 


-+ 


— + 


< 


|ALPHA1 


ICLI 


1*10(9), x'ao^ 




(ALPHA2 


|CLI 


|40(REG9) ,TEN 




|BETA1 


[CLI 


1 ZETA, TEN 




(BETA2 


|CLI 


|ZETA,C'A a 




(GAMMA1 


|SIO 


1 HOI 9> 




(GAMMA2 


JSIO 


I 191 




(GAMMA3 


|SIO 


1*10(0) 




(GAMM&4 


|SIO 


|ZETA 




t 


_JL 


J. . 


j 



The ALPHA instructions and GAMMA 1- GAMMA 3 
specify explicit addresses; the BETA 
instructions and GAMMA4 specify implied 
addresses. GAMMA2 specifies a displacement 
of 0. GAMMA 3 does not specify a base 
register. 



SS Format 



1 Name 

| . 

JALPHAl 

|ALPHA2 
| ALPHA 3 
| ALPHA4 
(BETA 
(GAMMA1 
| GAMMA 2 
(GAMMA 3 

| GAMMA 4 

t . 



T . T 

Operation | Operand | 

AP (40(9, 8), 30(6, 7) 

AP |40CNINE,REG8),30CL6,7) 

AP (FIELD2, FIELDl 

AP | FIELD2 ( 9) , FIELD1 ( 6) 

AP | FIELD2 (9 ) , FIELDl 

MVC |40C9,8),30(7) 

MVC (40CNINE,REG8) ,DECC7) 

MVC (FIELD2, FIELDl 

MVC (FIELD2 (9), FIELDl 



ALPHA1, ALPHA2, GAMMA1 , and GAMMA2 spe- 
cify explicit lengths and addresses. 
ALPHA3 and GAMMA3 specify both implied 
length and implied addresses. ALPHA 4 and 
gamma** specify explicit length and implied 
addresses. BETA specifies an explicit 
length for FIELD2 and an implied length for 
FIELDl; both addresses are implied. 



For the convenience of the programmer, 
the assembler provides extended mnemonic 
codes, which allow conditional branches to 
be specified ronemonically, as well as 
through the use of the BC and BCR machine 
instructions. These extended mnemonic 
codes specify both the machine branch 
instruction and the condition on which the 
branch is to occur. The codes are not part 
of the universal set of machine instruc- 
tions, but are translated by the assembler 
into the corresponding operation and condi- 
tion combinations. 



The allowable extended mnemonic codes 
and their operand formats are shown in 
Figures 4 and 5, together with their 
machine instruction equivalents. All 
extended mnemonics in Figure 4 are for 
instructions in the RX format. Figure 5 
shows the extended mnemonics for instruc- 
tions in the RR format. Note that the only 
difference between the operand fields of 
the extended mnemonics and those of their 
machine instruction equivalents is the 
absence of the Rl field and the comma that 
separates it from the rest of the operand 
field. The extended mnemonic list for the 
RX format, like the machine instruction 
list, shows explicit address formats only. 
Each address can also be specified as an 
implied address. 

In the following examples, which 
illustrate the use of extended mnemonics, 
it is to be assumed that the symbol GO is 
defined elsewhere in the program. 



(Name 

k .. + + < 



t 



„ T T 

I Operation | Operand 

•+ +- 

|B (40(3,6) 
|B |«*0(0,6) 
|BL |GO(3) 
|BL |GO 
| BR ■ 1 4 
1 BER | 3 
.A . X 



— 1 



The first two instructions specify an 
unconditional branch to an explicit 
address. The address in the first case is 
the sum of the contents of base register 6, 
the contents of index register 3 f and the 
displacement 40; the address in the second 
instruction is not indexed. The third 
instruction specifies a branch on low to 
the address implied by GO as indexed by the 
contents of index register 3; the fourth 
instruction does not specify an index reg- 
ister. The fifth instruction is an uncon- 
ditional branch to the address contained in 
register 4. The last instruction specifies 
a branch on equal to the address contained 
in register 3. 
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Extended Code 



Meaning 



Machine-Instruction 



H- 



B 
NOP 



D2(X2,B2) 
D2(X2,B2) 



Branch Unconditional 
No Operation 



BC 15,D2CX2 f B2) 
BC f D2(X2 f B2> 



Used After compare Instructions 



BH 

BL 

BE 

BNH 

BNL 

BNE 



D2(X2 f B2) 
D2CX2 f B2) 
D2(X2 # B2) 
D2(X2,B2) 
D2(X2 # B2> 
D2(X2 f B2> 



"T" 

I 



Branch on High 
Branch on Low 
Branch on Equal 
Branch on Not High 
Branch on Not Low 
Branch on Not Equal 



H 



Used After Arithmetic Expressions 



BC 2 # D2(X2,B2) 
BC *4 f D2(X2 f B2> 
BC 8,D2(X2,B2) 
BC 13,D2(X2 f B2) 
BC ll f D2IX2 t B2) 
BC 7,D2(X2 f B2> 



BO 

BP 

BM 

BZ 

BNM 

BNO 

BNP 

BNZ 



D2(X2,B2> 
D2tX2 f B2) 
D2(X2 f B2> 
D2(X2 f B2) 
D2(X2,B2) 
D2tX2 f B2) 
D2CX2,B2) 
D2(X2 f B2> 



Branch on Overflow 
Branch on Plus 
Branch on Minus 
Branch on Zero 
Branch on Not Minus 
Branch on No Overflow 
Branch on Not Plus 
Branch on Not Zero 



BC l f D2(X2 f B2) 
BC 2,D2(X2 f B2) 
BC *i,D2(X2 f B2> 
BC 8 f D2(X2 f B2) 
BC ll f D2CX2,B2) 
BC l<*,D2(X2 f B2) 
BC 13,D2(X2,B2> 
BC 7,D2(X2,B2) 



— » 



Used After Test Under Mask Instructions 



BO 

BM 

BZ 

BNM 

BNO 

BNZ 

Figure 



D2(X2,B2) 
D2(X2 # B2> 
D2(X2 f B2> 
D2CX2 f B2) 
D2CX2 # B2) 
D2(X2 f B2) 



Branch if Ones 
Branch if Mixed 
Branch if Zeros 
Branch on Not Mixed 
Branch on Not Ones 
Branch on Not Zeros 



*4. 



Extended Mnemonic Codes 



i 



BC l,D2CX2 f B2> 
BC 4,D2(X2,B2) 
BC 8 f D2(X2 f B2) 
BC ll f D2(X2,B2) 
BC 1<4,D2(X2,B2) 
BC 7,D2CX2 f B2) 



(RX format) 
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Extended Code 



-+- 

I 
I 



Meaning 



Machine- Instruction 



BR R2 
NOPR R2 



Branch Unconditional 
No Operation 



BCR 
BCR 



15, R2 
0,R2 



Used After compare Instructions 



^ 



BHR 


R2 


BLR 


R2 


BER 


R2 


BNHR 


R2 


BNLR 


R2 


BNER 


R2 



Branch on High 
Branch on Low 
Branch on Equal 
Branch on Not High 
Branch on Not Low 
Branch on Not Equal 



I 



BCR 
BCR 
BCR 
BCR 
BCR 
BCR 



2 f R2 
i* f R2 
8,R2 
J3.R2 
ll f R2 
7 # R2 



BOR 


R2 


BPR 


R2 


BMR 


R2 


BZR 


R2 


BNMR 


R2 


BNOR 


R2 


BHPR 


R2 


BNZR 


R2 



I 

-X- 



Used After Arithmetic Expressions 

T 

Branch on Overflow | 

Branch on Plus | 

Branch on Minus | 

Branch on Zero | 

Branch on Not Minus | 

Branch on No Overflow | 

Branch on Not Plus | 

Branch on Not Zero I 



BCR 
BCR 
BCR 
BCR 
BCR 
BCR 
BCR 
BCR 



l f R2 

2,R2 

«* f R2 

8 f R2 

ll f R2 

H*,R2 

13.R2 

7 f R2 






BOR 


R2 


BMR 


R2 


BZR 


R2 


BNMR 


R2 


BNOR 


R2 


BNZR 


R2 



Used After Test Under Mask Instructions 



Figure 5. Extended 



| Branch if Ones 

| Branch if Mixed 

| Branch if Zeros 

| Branch on Not Mixed 

| Branch on Not Ones 

| Branch on Not Zeros 

Mnemonic Codes (RR format} 



BCR 
BCR 
BCR 
BCR 
BCR 
BCR 



l f R2 
4,R2 
8 9 R2 
ll f R2 
14 # R2 
7 f R2 
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SECTION 5; ASSEMBLER INSTRUCTION STATEMENTS 



just as machine instructions request the 
computer to perform a sequence of opera- 
tions during program execution time, so as- 
sembler instructions request the assembler 
to perform certain operations during the 
assembly. Assembler instruction state- 
ments, in contrast to machine instruction 
statements, do not always cause machine 
instructions to be included in the 
assembled program. Some, such as DS and 
DC, generate no instructions but do cause 
storage areas to be set aside for constants 
and other data. Others, such as EQU and 
SPACE, are effective only at assembly time; 
they generate nothing in the assembled pro- 
gram and have no effect on the location 
counter. 

This is a list of all the assembler 

instructions: 

Symbol Definition Instruction 
EQU - Equate symbol 

Data Definition Instructions 

DC - Define constant 

DS - Define storage 

DXD - Define external dummy section 

CXD - Cumulative length external dummy 

section 
CCW - Define channel command word 

♦ Program Sectioning and Linking 
Instructions 

START - Start assembly 

CSECT - Identify control section 

DSECT - Identify dummy section 

ENTRY - Identify entry point symbol 

EXTRN - Identify external symbol 

COM - Identify blank common control 

section 
PSECT - Identify prototype section 

* Base Register Instructions 
USING - Use base address register 
DROP - Drop base address register 

* Discussed earlier in this section 

Listing Control Instructions 
TITLE - Identify assembly output 
EJECT - Start new page 
SPACE - Space listing 
PRINT - Print optional data 

Program Control Instructions 

ICTL - Input format control 

ISEQ - Input sequence checking 

ORG - Set location counter 

LTORG - Begin literal pool 

CNOP - Conditional no operation 

COPY - Copy predefined source coding 



END - End assembly 

PUNCH - Punch card 

REPRO - Reproduce following card 



SYMBOL DEFINITION INSTRUCTION 

EQU — Equate Symbol 

The EQU instruction defines a symbol by 
assigning to it the attributes specified in 
the operand fields • The format of the EQU 
instruction statement is: 



r ..„ — T . r _. . , 

(Name ( Operation | Operand | 

(Symbol, | EQU (Previously defined J 

(variable | (symbol, length, type | 

(symbol, orj I 1 I 

^blank | \ | 



The symbol in the name field is option- 
al; if it is omitted, the statement is 
treated as a comment. A variable symbol is 
valid in the name field; it is possible to 
code 

tNAME EQU * 

where (NAME is undefined. 

The first operand may be absolute 
(including negative), relocatable, or com- 
plex. Symbols in this field must be pre- 
viously defined „ This operand may not be 
omitted unless the name field is also 
omitted. 

The second operand specifies an explicit 
length attribute. It consists of any abso- 
lute integer expression with a value from 1 
to 65535, or a 1 - Jl byte self -defining 
term (hex, character, or binary). 

The third operand specifies an explicit 
type attribute. It consists of any abso- 
lute integer expression with a value from 
to 255 # or a 1-byte self-defining term 
(hex, character, or binary). 

The symbol in the name field is given 
the attributes explicitly specified by the 
second and third operands. If the second 
operand is omitted, the symbol in the name 
field will receive the length attribute of 
the first operand. If the first operand 
consists of an absolute value, the length 
attribute of the symbol is 1; otherwise, 
the length attribute is that of the left- 
nrost (or only) term of the first operand. 
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If the type attribute is omitted, the 
symbol's type attribute is assigned as U 

(undefined) . 

The value attribute of the symbol in the 
name Held is the value of the first 
operand. 

Note: The second and third operands are 
optional; if they are specified, they roust 
be written in the order shown above. If 
the length attribute is omitted, and the 
type attribute is specified, a coirjua roust 
be used to indicate the missing operand. 

The EQU instruction equates symbols to 
register numbers, immediate data, and other 
arbitrary values. These examples illus- 
trate how this might be done: 

r _. T _. T „. . 1 

(Name I Operation | Operand | 

|REG2 | EQU | 2 (general register) | 
| TEST | EQU |X , 3F f (immediate data) | 

i. X— x i 

In the following example, LENGTH is 
equated to EXP2. The length attribute is 
explicitly specified as 8, overriding the 
length attribute of EXP2. TYPE is equated 
to EXP3| the type attribute is C (charac- 
ter) . DEFAULT is equated to VALUE. 
Because the second and third operands are 
omitted, the length and type attributes are 
determined by the attributes of VALUE. 

r ™ T __. — t- ■ ■ ' ' 1 

(Name (Operation (Operand | 

(LENGTH | EQU |EXP2,8 | 

(TYPE (EQU (EXPa^^C* j 

I DEFAULT | EQU (VALUE | 

t . X_ X . I 

To reduce programming time, the program- 
mer can equate symbols to frequently used 
expressions, and then use the symbols as 
operands instead of the expressions. Thus, 
in the statement: 



(Name (Operation (Operand j 

| FIELD (EQU | ALPHA-BETA+GAMMA | 

l X- - X — . 1 

FIELD is defined as ALPHA- BETA* GAMMA and 
may be used in place of it. However, 
ALPHA, BETA, and GAJMMA must have been pre- 
viously defined. 



DATA DEFINITION INSTRUCTIONS 

The five data definition instruction 
statements are: define constant CDC), 
define storage (DS), define external dummy 



section (DXD) , cumulative length external 
dummy section CCXD), and define channel 
command word (CCW) . They are used to; Ca) 
enter data constants into storage, Cb> 
define and reserve areas of storage, Cc) 
define storage for external dummy sections, 
(d) specify the cumulative length for 
external dummy sections, and (e) specify 
the contents of channel command words. The 
statements may be named by symbols so that 
other program statements can refer to the 
fields generated from them. 



Discussion of the DC instruction is more 
extensive than that of the DS or DXD 
instructions, because the DS and DXD 
instructions are written in the same format 
as the DC instruction and may specify some 
or all of the information that the DC 
instruction provides. Only the function 
and treatment of the statements vary. 
Therefore, the DC instruction is presented 
first and discussed in more detail than ei- 
ther the DS or DXD instructions. 

DC — Define Constant 

The DC instruction provides constant 
data in storage. It may specify one con- 
stant or a series of constants, thereby 
relieving the programmer of the necessity 
to write a separate data definition state- 
ment for each constant desired. Further- 
more, a variety of constants may be speci- 
fied: fixed-point, floating-point, decim- 
al, hexadecimal, character, and storage 
addresses. (Data constants are generally 
called constants unless they are created 
from storage addresses, in which case they 
are called address constants.) The format 
of the DC instruction statement is: 



(Name (Operation (Operand | 

k + _._+ _ - H 

(Symbol (DC (One or more operands | 
j or blank | jin format described j 
| j | below, each separated | 

( | | by comma j 

i x x «. J 

Each operand consists of four subfields; 
the first three describe the constant, and 
the fourth provides the constants. The 
second and fourth subfields must be speci- 
fied; the first and third are optional. 
Note that more than one constant may be 
specified in the fourth subfield for most 
types of constants. All specified con- 
stants must be of the same typei the 
descriptive subfields that precede the con- 
stants apply to all of them. No blanks may 
occur within any subfields (unless provided 
as characters in a character constant or a 
character self-defining term) , nor may they 
occur between the subfields of an operand. 
Similarly, blanks may not occur between 
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operands and the commas that separate them, 
when multiple operands are being specified. 



The subfields of each DC operand are 
written in this sequence: 

12 3 14 

Duplication Type Modifiers Constants 
Factor 

Although the constants specified in an 
operand must have the same characteristics, 
each operand may specify different types of 
constants. For example, in a DC instruc- 
tion with three operands, the first operand 
might specify four decimal constants, the 
second a floating-point constant, and the 
third a character constant. 

The symbol that names the DC instruction 
is the name of the constant Cor first con- 
stant if the instruction specifies more 
than one) . Relative addressing (for 
example, SYMBOL* 2) may be used to address 
the various constants if more than one has 
been specified, because the number of bytes 
allocated to each constant can be 
determined. 

The value attribute of the symbol naming 
the DC instruction is the address pf the 
leftmost byte (after alignment) of the 
first, or only, constant. The length 
attribute depends on two things: the type 
of constant being defined and the presence 
of a length specification. Implied lengths 
are assumed for the various constant types f 
in the absence of a length specification. 
If more than one constant is defined, the 
length attribute is the length in bytes 
(specified or implied) of the first 
constant. 

Boundary alignment also varies according 
to the type of constant being specified and 
the presence of a length specification* 
Some constant types are only aligned to a 
byte boundary, but the DS instruction can 
be used to force any type of word boundary 
alignment for them. This is explained un- 
der "DS — Define Storage." Other con- 
stants are aligned at various word boun- 
daries (half, full, or double) in the 
absence of a length specification. If 
length is specified, no boundary alignment 
occurs for such constants. 

Bytes that must be skipped to align the 
field at the proper boundary are not con- 
sidered to be part of the constant. In 
other words, the location counter is incre- 
mented to reflect the proper .boundary (if 
incrementing is necessary) , before the 
address value is established* Thus, the 
symbol naming the constant will not receive 
a value that is the location of a skipped 
byte. 



Any bytes skipped in aligning statements 
that do not cause information to be 
assembled are not set to hexadecimal 0. 
Thus bytes skipped to align a statement 
such as DC F f 123 f are set to hexadecimal 0, 
and bytes skipped to align a statement such 
as DS F are not set to hexadecimal 0. 

Information concerning constants, pre- 
sented in this section, is summarized in 
Appendix C. 

LITERAL DEFINITIONS ; The discussion of 
literals as machine instruction operands 
(in Section 2) referred the reader to the 
description of the DC operand for the 
method of writing a literal operand. All 
subsequent operand specifications are appl- 
icable to writing literals; the only dif- 
ferences are: 

1. The literal is preceded by an equal 
sign* 

2. Multiple operands may not be 
specified* 

3. The duplication factor may not be 0. 

i*. S-type address constants may not be 
specified. 

Examples of literals appear throughout 
the remainder of the DC instruction 
discussion* 

Operand Subfield 1: Duplication Factor 

The duplication factor may be omitted. 
If specified, it causes the constants to be 
generated as many times as indicated by the 
factor, which may be specified either by an 
unsigned decimal self- defining term or by a 
positive absolute expression that is en- 
closed by parentheses. All symbols in the 
expression must be previously defined. 

The duplication factor is applied after 
the constant is assembled. A duplication 
factor of is permitted, except in a lit- 
eral, and achieves the same result as it 
would in a DS instruction (see "Forcing 
Alignment," under "DS — Define Storage," 
later in this section) . 

Note : If duplication is specified for an 
address constant containing a location 
counter reference, the value of the loca- 
tion counter used in each duplication is 
incremented by the length of the constant. 

Operand Subfield 2; Type 

This subfield defines the type of con- 
stant being specified. From that specifi- 
cation, the assembler determines how it 
will interpret the constant and translate 
it into the appropriate machine format. 
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r - T . 

1 Code | Type of Constant 



Machine Format 



-4 



Character 

Hexadecimal 

Binary 

Fixed-point 

Fixed-point 

Floating-point 

Floating-point 

Decimal 

Decimal 

Address 

Address 

Address 

Address 

Address 

Address 



8-bit code for each character 
4-bit code for each hexadecimal digit 
Binary format 

Signed, fixed-point binary format; normally a fullword 
Signed, fixed-point binary format? normally a halfword 
Short floating-point format? normally a fullword 
Long floating-point format; normally a doubleword 
Packed decimal forirat 
Zoned decimal format 

Value of address; normally a fullword 
Value of address; normally a halfword 
Base register and displacement value; a halfword 
Space reserved for offset of external dummy section; normal- 
ly a fullword 

Space reserved for external symbol addresses; each address 
normally a fullword 

Space reserved for address of control section of external 
symbol; each address normally a fullword 



Figure 6. Type Codes for Constants 



The type is specified by a single-letter 
code, as shown in Figure 6. 

Further information about these con- 
stants is provided in the discussion of the 
constants themselves, under "Constant," 
below. 

Operand Subfield 3: Modifiers 

Modifiers describe the length in bytes 
desired for a constant (in contrast to an 
implied length), and the scaling and 
exponent for the constant. If multiple 
modifiers are written, they must appear in 
this sequence: length, scale, exponent. 
Each is written and used as described in 
the following text. 



LENGTH MODIFIER: 



This is written as Ln, 



where n is either an unsigned decimal value 
or an absolute expression enclosed by 
parentheses. Any symbols in the expression 
must be previously defined. A paired relo- 
catable expression cannot be used in a 
length modifier to form an absolute expres- 
sion. The value of n represents the number 
of bytes of storage assembled for the con- 
stant. The maximum values permitted for 
the length modifiers supplied for the 
various types of constants are summarized 
in Appendix c . Also, this appendix indi- 
cates the implied length for each type of 
constant; the implied length is used unless 
a length modifier is present. A length 
modifier may be specified for any type of 
constant, but no boundary alignment will be 
provided when a length modifier is given. 

Bit-Length Specification : The bit length 
of a constant is specified by L.n, where n 
is specified as above and represents the 
number of bits in storage into which the 



constant is to be assembled. The value of 
n may exceed 8 and is interpreted to mean 
an integral number of bytes plus so many 
bits. For example, L.20 is interpreted as 
a length of two bytes plus four bits. 



Assembly of the first (or only) constant 
with bit-length specification starts on a 
byte boundary. The constant is placed in 
the high- or low-order end of the field, 
depending on the type of constant being 
specified. The constant is padded or trun- 
cated to fit the field. If the assembled 
length does not leave the location counter 
set at a byte boundary, and another tit- 
length constant does not follow, the 
remainder of the last byte used is filled 
with Os. This leaves the location counter 
set at the next byte boundary. A fixed- 
point constant with a specified bit length 
of 13, as coded, and as it would appear in 
storage, is shown in Figure 7. Note that 
the constant has been padded on the left to 
bring it to its designated 13-bit length* 



A reference to BLCON, with an implied 
length of two bytes, would cause both bytes 
to be referenced. 

When tit- length specification is used in 
association with multiple constants Csee 
"Constants," below), each succeeding con- 
stant in the list is assembled, starting at 
the next available bit . Figure 8 illus- 
trates this. 

The symbol used as a name entry in a DC 
assembler instruction takes on the length 
attribute of the first constant in the 
list; the implied length of BLMCON in 
Figure 8 is two bytes. 



^^ 



I f^> coded 



t . T .„ T 

| Name j Operation (Operand 
h 



IFL.13'579' 

-X . . — 



| BLCON I DC 

i 

i In stor<i<je 
I bytu byte byte 
padding 
0001001000011000 
579 fill 



Figure 7. Bit-Length Specification 
(Single Constant) 



I As coded 



4 



j. „ T .„ r ~ 

[Name (Operation (Operand 

l„. 1 .. + „„ - 

|BLMCON(DC (FL.IO 1 673,21,57' 

f „_X X„ 

I 

1 In storage 

1 

| byte byte byte byte byte 

1 | | padding! paddling 

( 10101000010000010101000011100100 
I 



673 



21 



57 



fill 






Figure 8. Bit-Length Specification (Mul- 
tiple Constants) 



If duplication is specified, filling 
occurs once, at the end of the field occu- 
pied by the duplicated constants. 



When bit-length specification is used in 
association with multiple operands, assem- 
bly of the constants in each succeeding 
operand starts at the next available bit. 
Figure 9 illustrates this. 



Three different types of constants have 
been specified in Figure 9, one to an 
operand. Note that the character constant 
•AB", which normally would occupy 16 bits, 
is truncated on the right to fit the desig- 
nated 10-bit field. Note that filling 
occurs only at the end of the field occu- 
pied by all the constants. 



Name (oper- | Operand j 

jationj | 

BLMOCON|DC |FL.7»9 f # CL.l0 f AB f .XL-l^'CH* | 
_ X 4 . „„ _ H 



As coded 



In storage 



byte byte byte byte h'/tt 

Jpaddingl 1 paddinb j 

00010011100000111000000110001000 



C4 



fill 



A plus 
first two 
bits of B 



Figure 9. Bit-Length Specification (Mul- 
tiple Operands) 



SCALE MODIFIER : This modifier is written 
as Sn, where n is either a decimal value or 
an absolute expression enclosed by paren- 
theses. Any symbol in the expression must 
be previously defined* The decimal self- 
def ining term or the parenthesized expres- 
sion may be preceded by a sign; if none is 
present, a plus sign is assumed. The maxi- 
mum values for scale modifiers are sum- 
marized in Appendix c 

A scale modifier may be used with fixed- 
point (F f H> and floating-point (E f D) con- 
stants only. It is used to specify the 
desired amount of internal scaling. 

Scale Modifier for Fixed-Point Constants : 
This modifier specifies the power of 2, by 
which the constant must be multiplied after 
it has been converted to its binary repre- 
sentation. Just as multiplication of a 
decimal number by a power of 10 causes the 
decimal point to move, multiplication of a 
binary number by a power of 2 causes the 
binary point to move. This multiplication 
has the effect of iroving the binary point 
away from its assumed position in the 
binary field — - the assumed position being 
to the right of the rightmost position. 

Thus, the scale modifier indicates ei- 
ther of these: (a) the number of binary 
positions to be occupied by the fractional 
portion of the binary number, or (b> the 
number of binary positions to be deleted 
from the integral portion of the binary 
number. 

A positive scale x will shift the 
integral portion of the number x binary 
positions to the left, thereby reserving 



Section 5: Assembler Instruction Statements 35 



the rightmost x binaiy positions for the 
I j aot i on«-i 1 portion. A negative scale 
.shift r the integral portion of the number 
i. ■ » the right, thereby deleting rightmost 
i nt t \i) i a i pos i t ions . If a scale modifier 
£*° 5^!L. 1Kjt - acco mpany a fixed -point constant 
cc rvt lini ng a fractional part, the fraction- 
f*L r ^ar t is lost . 

In all r.ises where positions are lost 
because? <>t scaling (or the lack of scal- 
ing), rounding occurs in the leftmost bit 
<»< Hie lost portion. The rounding is 
n i f l«ci(d in the rightmost position saved. 

ti^'.iii* Mo difier for Floating-Point Con- 
sta nt s i Only a positive scale modifier may 
be used with a floating-point constant. It 
indicates the number of hexadecimal posi- 
tions t hat the fraction is to be shifted to 
the right. Note that this shift is in 
terms of hexadecimal positions, each of 
which is four binary positions. (A posi- 
tive scaling actually indicates that the 
point io to be moved to the left. However, 
a t ioati ng-point constant is always con- 
verted to a fraction, which is hexadecimal- 
ly normali zed. The point is assumed to be 
at the left of the leftmost position in the 
field; since the point cannot be moved 
left, the traction is shifted right.) 



Thus, scaling that is specified for a 
floating-point constant provides an 
assembled fraction that is unnormalized; 
that Is, it contains hexadecimal Os in the 
leftmost positions of the fraction. When 
the traction is shifted, the exponent is 
adjusted accordingly to retain the correct 
magnitude. When hexadecimal positions are 
lost, rounding occurs in the leftmost hexa- 
decimal position of the lost portion. The 
rounding is reflected in the rightmost 
hexadecimal position saved. 

EXPONENT MODIFIER : This modifier is writ- 
ten as En, where n is either a decimal 
self -defining term or an absolute expres- 
sion enclosed by parentheses. Any symbols 
in the expression must be previously 
defined. The decimal value of the paren- 
thesized expression may be preceded by a 
sign; if none is present, a plus sign is 
assumed. The maximum values for exponent 
modifiers are summarized in Appendix C . 

An exponent modifier may be used with 
fixed-point CF, H) and floating-point (E, 
D) constants only. The modifier denotes 
the power of 10 by which the constant is to 
be multiplied before its conversion to the 
proper internal format. 

This modifier is not to be confused with 
the exponent of the constant itself, which 
is specified as part of the constant and is 
explained under "Constant," below. Both 
are denoted in the same fashion, as En. 



The exponent modifier affects each constant 
in the operand; the exponent written as 
part of the constant only pertains to that 
constant. Thus, a constant may be speci- 
fied with an exponent of +2, and an 
exponent modifier of +5 may precede the 
constant. In effect, the constant has an 
exponent of *7. 

Note that there is a maximum value, both 
positive and negative, listed in Appendix 
C, for exponents. This applies both to 
exponent modifier and exponents specified 
as part of the constant, or to their sum, 
if both are specified. 

Operand Subfield 4: Constant 

This subfield supplies the constants 
described by the subfields that precede 
them. A data constant (all types except A, 
¥• S, Q, V, and R) is enclosed by apos- 
trophes. An address constant (types A, Y f 
S, Q, V, and R) is enclosed by parentheses. 
To specify two or more constants in the 
subfield, the constants must be separated 
by commas, and the entire sequence of con- 
stants must be enclosed by the appropriate 
delimiters (that is, apostrophes or paren- 
theses). The format for specifying con- 
stants is one of these: 

Single Multiple 

Constant Constants* 

■bonstant 1 ' constant , . . . , constant ' 

(constant) (constant, . . . , constant) 

♦Not permitted for character, hexadecimal, 
and binary constants. 

All constant types except character (C) , 
hexadecimal (X) , binary (B) , packed decimal 
(P) , and zoned decimal (Z) , are aligned on 
the proper boundary, as shown in Appendix 
F, unless a length modifier is specified. 
In the presence of a length modifier, there 
is no boundary alignment. If an operand 
specifies more than one constant, any 
necessary alignment applies to the first 
constant only. Thus, for an operand that 
provides five fullword constants, the first 
would be aligned on a fullword boundary, 
and the rest would automatically fall on 
fullword boundaries. 

The total storage requirement of an 
operand is the product of the length multi- 
plied by the number of constants in the 
operand, multiplied by the dupiicaticn fac- 
tor (if present), plus any bytes skipped 
for boundary alignment of the first con- 
stant. If more than one operand is pre- 
sent, the storage requirement is derived by 
summing the requirements for each operand. 

If an address constant contains a loca- 
tion counter reference, the location count- 
er value to be used is the storage address 
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of the first byte the constant will occupy. 
Thus, if several address constants in the 
sane instruction refer to the location 
counter, the value of the location counter 
varies from constant to constant- Similar- 
ly, if a single constant is specified (and 
it is a location counter reference) with a 
duplication factor, the constant is dupli- 
cated with a varying location counter 
value. 



r « T « ._ T „. .„_ . 1 

| Name | Operation (Operand | 

| FIELD | DC iCL15 f TOTAL IS 110 • | 

i . X . . . JL-_ — . -. J 

In this example, the length attribute of 
FIELD is 12, although 13 characters appear 
in the operandi two ampersands count as one 
byte: 



The following text describes each con- 
stant type and provides examples. 



Character Constant — C : Any of the valid 
256 punch combinations may be designated in 
a character constant. Only one character 
constant may be specified per operand. 
Since multiple constants within an operand 
are separated by commas, an attempt to spe- 
cify two character constants would result 
in interpreting the comma separating them 
as a character. 



(Name (Operation {operand } 

K x — _ + 4 

| FIELD | DC !C f TOTAL IS M10' | 

I . X . - ,_X . . . J 

Note that in this example, a length of 4 
has been specified § but there are five 
characters in the constant: 



(Name (Operation (Operand 

f _ + _ + 

| FIELD | DC |3CLi» , ABCDE , | 



i 



Special consideration must be given to 
representing apostrophes and ampersands as 
characters. Each apostrophe or ampersand 
desired as a character in the constant must 
be represented by a pair of apostrophes or 
ampersands. Only one apostrophe or amper- 
sand appears in storage. 

The maximum length of a character con- 
stant is 256 bytes. No boundary alignment 
is performed. Each character is translated 
into one byte. Double apostrophes or 
double ampersands count as one character. 
If no length modifier is given, the size in 
bytes of the character constant is equal to 
the number of characters in the constant. 
If a length modifier is provided, the 
result varies, as follows: 

1. If the number of characters in the 
constant exceeds the specified length, 
as many rightmost bytes and/or bits as 
necessary are dropped. 

2. If the number of characters is less 
than the specified length, the excess 
rightmost bytes and/or bits are filled 
with blanks. 

In this example, the length attribute of 
FIELD is 12: 



| T T 1 

| Name | Operation | Operand | 

I FIELD | DC | C f TOTAL IS 110 f | 

However, in this example, the length 
attribute is 15, and three blanks appear in 
storage to the right of the 0: 



The generated constant would be 

ABCDABCDABCD 

but, if the length had been specified as 6 
instead of 4, the generated constant would 
have been: 

ABCDE ABODE ABODE 

Note that the same constant could be speci- 
fied as a literal: 



r T T _ 

| Name | Operation | Operand 

H + — + . 

| IMVC 

t X -X. 



I 
|AREA(12) ,=3CLH f ABCDE* | 



Hexadecimal Constant — X : A hexadecimal 
constant consists of one or more of the 
hexadecimal digits 0-9 and A-F. Only one 
hexadecimal constant may be specified per 
operand. The maximum length of a hexade- 
cimal constant is 256 bytes C512 hexadecim- 
al digits) . No boundary alignment is 
performed. 

Constants that contain an even number of 
hexadecimal digits are translated as one 
byte per pair of digits. If an odd number 
of digits is specified, the leftmost byte 
has the leftmost four bits filled with a 
hexadecimal 0; the rightmost four bits con- 
tain the odd (first) digit. 

If no length modifier is given, the 
implied length of the constant is half the 
number of hexadecimal digits in the con- 
stant Cassuming that a hexadecimal is 
added to an odd nunrber of digits) . If a 
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length modifier is given, this is the 

handling of the constant: 



1. If the number of hexadecimal digit 
pairs exceeds the specified length, 
the necessary leftmost bits (and/or 
hyten) txie dropped. 

2. if the number of hexadecimal digit 
pairs is less than the specified 
length, the necessary bits Cand/or 
bytes) are added to the left and 
filled with hexadecimal Os. 

An 8-digit hexadecimal constant provides 
a convenient way to set the bit pattern of 
a full binary word. The constant in the 
following example would set the first and 
third bytes of a word to Is: 

, T T 1 

(Name [Operation (Operand | 

| |DS [OF i 

(TEST (DC JX'FFOOFFOO 1 j 

l JL X . . 4 

The DS instruction sets the location 
counter to a fullword boundary. 

The next example uses a hexadecimal con- 
stant as a literal and inserts Is into bits 
2*1 through 31 of register 5: 

r T _ r . . «, 

| Name J Operation) Operand | 

I. + — ... + 4 

[ 1IC 15 f =X•FF , | 

i x l . i 

In this example, the digit A would be 
dropped, because five hexadecimal digits 
are specified for a length of two bytes: 

r T T . T 

(Name (Operation) Operand | 

t „ + _ — + „ 4 

|ALPHACON|DC | 3XL2 • A6F4E* | 

i . JL . A . . J 

The resulting constant would be 6F4E, 
which would occupy the specified two bytes. 
It would then be duplicated three tiroes, as 
requested by the duplication factor. If 
x'AbF^E 1 had been specified, the resulting 
constant would have had a hexadecimal in 
the leftmost position: 

0A6F4E 



Binary Constant 



J3s A binary constant 



uses Is and Os enclosed in apostrophes? 
only one binary constant may be specified 
in an operand. Duplication and length may 
be specified. The maximum length of a 
binary constant is 256 bytes. 



The implied length of a binary constant 
is the number of bytes occupied by the con- 
stant, including any padding necessary. 
Padding or truncation takes place on the 
left j the padding bit used is a 0. 

In this example of the coding used to 
designate a binary constant, BCCN would 
have a length attribute of 1: 

r T . T ■ ■ 1 

(Name (Operation (Operand | 

|BCCN |DC |B f 11011101 f | 

|BTRUNC|DC | BL1* 100100011* | 

JBPAD (DC |BLl , 101 f | 

t_ JL 4. . . J 

BTRUNC would assemble with the leftmost bit 
truncated : 00100011 

BPAD would assemble with five 0s as pad- 
ding: 00000101 

Fixed-Point Constants — F and H : A fixed- 
point constant is written as a decimal num- 
ber, which may be followed by a decimal 
exponent if desired. The number may be an 
integer, a fraction, or a mixed number 
(i.e., one with integral and fractional 
portions). The format of the constant is: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number r it may be omitted, 
in which case the number is assumed to 
be an integer. A positive sign is 
assumed if an unsigned number is spec- 
ified. Unless a scale modifier accom- 
panies a mixed number or fraction, the 
fractional portion is lost, as 
explained under "Operand Subfield 3: 
Modifiers," above. 

2. The exponent is optional. If speci- 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci- 
fying the exponent of the factor 10. 
The exponent may be in the range -85 
to +75. If an unsigned exponent is 
specified, a plus sign is assumed. 
The exponent causes the value of the 
constant to be adjusted by the speci- 
fied power of 10 before the constant 
is converted to its binary form. 

The number is converted to its binary 
equivalent and is assembled as a fullword 
or halfword, depending on whether the type 
is specified as F or H. It is aligned at 
the proper fullword or halfword boundary if 
a length is not specified. An implied 
length of four bytes is assumed for a full- 
word (F) and two bytes for a halfword (B)* 
However, any length up to and including 
eight bytes may be specified for either 



3B 



type of constant by a length modifier, in 
which case no boundary alignment occurs. 



Maximum and minimum values, exclusive of 
scaling, for fixed-point constants are: 



Length 



Max 



uis 



8 


2"-l 


- 2 « 


a 


2 3i-l 


~2** 


2 


2"-l 


-2" 


l 


2 7 -l 


-2 7 



The binary number occupies the rightmost 
portion of the field in which it is placed. 
The unoccupied portion Ci.e., the leftmost 
bits) is filled with the sign; that is, the 
setting of the bit designating the sign is 
the setting for the bits in the unused por- 
tion of the field. If the value of the 
number exceeds the length, the necessary 
leftmost bits are dropped. A negative num- 
ber is carried in 2s complement form. 

If the rightmost portion of the number 
must be dropped as a result of scale modi- 
fiers, rounding occurs. Any duplication 
factor that is present is applied after the 
constant is converted to its binary format 
and assembled into the proper number of 
bytes. 

A field of three fullwords is generated 
from the statement shown below. The loca- 
tion attribute of CONWRD is the address of 
the leftmost byte of the first word, and 
the length attribute is «*, the implied 
length for a fullword fixed- point constant. 
The expression CONWRD+4 could be used to 
address the second constant (second word) 
in the field. 

r T . — T : . «, 

| Name | Operation | Operand | 

| CONWRD | DC | 3F f 65847** • | 

L . JL — . JL . .. J 

The next statement causes the generation 
of a 2-byte field containing a negative 
constant. Notice that scaling has been 
specified in order to reserve six bits for 
the fractional portion of the constant. 



r — T T . — 

(Name | Operation | Operand 

k + + 

(HALFCON |DC |HS6'-25.93 V 



i 
— 4 

l 



The next constant (3.50) is multiplied 
by 10 to the -2 before being converted to 
its binary format. The scale modifier 
reserves 12 bits for the fractional 
portion. 



(Name j Operation (Operand ( 

k + „- + ... 4 

JFULLCON | DC | HS12 f 3. 50E-2 f | 

The same constant could be specified as 
a literal: 

r . 1 7 . , 

(Name (Operation (Operand | 

k + + 4 

| | AH |7,=HS12 i 3.50E-2 i | 

The final example specifies three con- 
stants; the scale modifier requests four 
bits for the fractional portion of each 
constant. The four bits are provided 
whether or not the fraction exists. 



JName (Operation {operand | 

|THREBCON|DC | FS^ 10, 25. 3,100 f | 

l A -X — J 

Floating-Point Constants — E and D : A 
floating-point constant is written as a 
decimal number, which may be followed by a 
decimal exponent, if desired. The number 
nay Jbe an integer, a fraction, or a mixed 
number (i.e., one with integral and frac- 
tional portions) . The format of the con- 
stant is: 

1. The number is written as a signed or 
unsigned decimal value. The decimal 
point may be placed before, within, or 
after the number; it may be omitted, 
in which case the number is assumed to 
be an integer. A positive sign is 
assumed if an unsigned number is 
specified. 

2. The exponent is optional. If speci- 
fied, it is written immediately after 
the number as En, where n is an 
optionally signed decimal value speci- 
fying the exponent of the factor 10. 
The exponent may be in the range -85 
to +75. If an unsigned exponent is 
specified, a plus sign is assumed. 

Machine format for a floating-point num- 
ber is in two parts: (a) the portion con- 
taining the exponent, which is sometimes 
called the characteristic, followed by (b) 
the portion containing the fraction, which 
is sometimes called the mantissa. There- 
fore, the number specified as a floating- 
point constant must be converted to a frac- 
tion before it can be translated into the 
proper format. For example, the constant 
27.35E2 represents the number 27.35 multip- 
lied by 10 to the 2nd. Represented as a 
fraction, it would be 0.2735 multiplied by 
10 to the 4th, the exponent having been 
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modified to reflect the shifting of the 
decimal point. The exponent may also be 
affected by the presence of an exponent 
modifier (explained under "Operand Subfield 
3: Modifiers.*) Thus, the exponent is also 
altered before being translated into 
ma chine format. When the constant is con- 
verted into the proper exponent and frac- 
tion, each is translated into its binary 
equivalent and arranged in machine 
floating-point format. 



The translated constant is placed in a 
full word or a doubleword, depending on 
whether the type is specified as E or D. 
it is aligned at the proper word or double- 
word boundary if a length is not specified. 
An implied length of four bytes is assumed 
for a fullword (E) f and eight bytes is 
assumed for a doubleword (D) • However, any 
length up to and including eight bytes may 
be specified for either type of constant by 
a length modifier, in which case no boun- 
dary alignment occurs. 



Within the portion of the floating-point 
field allocated to the fraction, the hexa- 
decimal point is assumed to be to the left 
of the leftmost hexadecimal digit, and the 
fraction occupies the leftmost portion of 
the field. The fraction is normalized (no 
leading hexadecimal Os), unless scaling is 
specified. If the rightmost portion of the 
fraction must be dropped, because of length 
or scale modifiers, rounding will occur. 
Negative fractions are carried in true 
representation, not in the 2s complement 
form. 



Any of the following statements could be 
used to specify 46.415 as a positive, full- 
word, floating-point constant; the last is 
a machine instruction statement with a lit- 
eral operand. Note that the last two con- 
stants contain an exponent modifier. 



f T 


T . 


. — 1 


(Name (Operation [Operand 


I 


i .„ i, _ .„ m _ _ 


r_. « 


J 


r^ t — — 


— -|.— — —— — — «. — -— — 


-j 


1 t*x: 


|E , 46.415 i 




| (DC 


|E'46415E~3 f 




1 ice 


|E f 4*4611. 15E-l f 




1 IDC 


IE , *.46415E+2 I 




I |DC 


|EE2 f .46415' 




1 )AE 


|6,=EE2' .46415' 




I J. 


.. i. . . 


-J 



The following would each be generated as 
doubleword floating-point constants. 

r T T 1 

(Name (Operation (Operand ( 

|FLOAT|DC |DE+4 f *46,-3. 729, +473' | 

L . A . A — — .- J 



Decimal Constants — P and % i A decimal 
constant is written as a signed or unsigned 
decimal value. If the sign is omitted, a 
plus sign is assumed. The decimal point 
may be written wherever desired, or it may 
be omitted. Scaling and exponent modifiers 
may not be specified for decimal constants. 
The maximum length of a decimal constant is 
16 bytes | there is no word boundary 
alignment. 



The placement of a decimal point in the 
definition does not affect the assembly of 
the constant in any way because, unlike 
fixed- point and floating-point constants, a 
decimal constant is not converted to its 
binary equivalent. The fact that a decimal 
constant is an integer, a fraction, or a 
mixed number is not pertinent to its 
generation. Further, the decimal point is 
not assembled into the constant. The pro- 
grammer may determine proper decimal point 
alignment, either by defining his data so 
that the point is aligned or by selecting 
machine instructions that will operate on 
the data properly (that is, shift it for 
purposes of alignment) . 



If zoned decimal format (Z) is speci- 
fied, each decimal digit is translated into 
one byte. The rightmost byte contains the 
sign, and the rightmost digit. For packed 
decimal format (P) f each pair of decimal 
digits is translated into one byte. The 
rightmost digit and the sign are translated 
Into the rightmost byte. The bit confi- 
guration for the digits is identical to the 
configurations for the hexadecimal digits 
0-9, as shown in Section 3 under "Hexade- 
cimal Self-Defining Value." For both 
packed and zoned decimals a plus sign is 
translated into the hexadecimal digit C, 
and a minus sign into the digit D. 

If an even number of packed decimal 
digits is specified, one digit will te left 
unpaired, because the rightmost digit is 
paired with the sign. Therefore, in the 
leftmost byte, the leftmost four bits will 
be set to 0s, and the rightmost four bits 
will contain the odd (first) digit. 

If no length modifier is given, the 
implied length for either constant is the 
number of bytes the constant occupies (tak- 
ing into account the format, sign, and 
possible addition of bits for packed 
decimals). If a length modifier is given, 
this is the handling of the constant; 

1. If the constant requires fewer bytes 
than the length specifies, the neces- 
sary number of bytes is added to the 
left. For zoned decimal format, the 
decimal digit is placed in each 
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added byte. For packed decimals, the 
bits of each added fcyte are set to 0, 

2. If the constant requires more bytes 

than the length specifies, the neces- 
sary number of leftmost digits or 
pairs of digits is dropped, depending 
on which format is specified. 

Examples of decimal constant 
def initione: 



r T T . 1 

(Name |Operation|Operand | 

j. + + i 

! |DC (P'+l^S* I 

I (DC \Z*-Sl\3' | 

| |JDC |Z C 79.68' | 

| (DC |PL3 , 79.68' | 

t A ._. . JL 4 

The following statement specifies both 
packed and zoned decimal constants. The 
length modifier applies to each constant in 
the first operand (that is, to each packed 
decimal constant) . Note that a literal 
could not specify both operands. 

r — . T T . ^ 

| Name | Operation) Operand | 

^ „ + + . „ H 

|DECIMALS|DC | PL8 * 4 25. 8, -3874, j 
| ( |+2. 3 f ,Z i ♦80,-3.72 , f 

l. J. i. 1 . . j 

This example illustrates the use of a 
packed decimal literal: 

r T T — ... ^ 

(Name | Operation (Operand j 

f + + ^ 

1 JUNPK |OUTAREA f =PL2**25 fl j 

t X . A . . J 



ADDRESS CONSTANTS : An address constant is 
a virtual storage address or an absolute 
expression that is translated into a con- 
stant. Address constants are normally used 
for initializing base registers to facili- 
tate the addressing of storage. Further, 
they provide the means of communicating 
between control sections of a multisection 
program. However, storage addressing and 
control section communication are also 
dependent on the USING assembler instruc- 
tion and the loading of registers. These 
considerations are illustrated in Section 3 
under "Programming With the USING 
Instruction. " 

An address constant, unlike other types 
of constants, is enclosed in parentheses. 
Two or more address constants specified in 
an operand are separated by commas, and the 
entire sequence is enclosed by parentheses. 
The six types of address constants are A, 
x, S, Q, V, and R. 



Complex Relocatable Expressions : A complex 
relocatable expression can only be used to 
specify an A-type or Y-type address con- 
stant. These expressions contain two or 
irore unpaired relocatable terms and/or a 
negative relocatable term, in addition to 
any absolute or paired relocatable terms 
that may be present, in contrast to relo- 
catable expressions, complex relocatable 
expressions may represent negative values. 
A complex relocatable expression might con- 
sist of external symbols (which cannot be 
paired) and designate an address in an 
independent assembly that is to be linked 
and loaded with the assembly containing the 
address constant . 



A-Type Address constant ; This constant is 
specified as an absolute, relocatable, or 
complex relocatable expression. (Remember 
that an expression may be single term or 
multiterm. ) The value of the expression is 
calculated as explained in Section 2, with 
one exception. The maximum value of the 
expression may be 2 3± -l. The implied 
length of an A-type constant is four bytes, 
and the value is placed in the rightmost 
position. The length that may be specifi- 
fied depends on the type of constant. A 
length of 1-4 bytes may be used for an 
absolute, relocatable, or complex expres- 
sion. The programmer is cautioned that 
address constants which contain relocatable 
values may cause truncation of the relo- 
cated value if fewer than four bytes are 
allowed for the length of the constant. 

In the following examples, the field 
generated from the statement named ACONST 
contains four constants, each of which 
occupies four bytes. Note that one has a 
location counter reference. The value of 
the location counter will be the address of 
the first byte allocated to the fourth con- 
stant. The second statement shows the same 
set of constants specified as literals 
(i.e., address constant literals). 

j Name (Operation (Operand j 

H + __+ . . _ H 

|ACONST|EC |A(108,LOOP, | 

j | |END-STRT,*+4096) j 

| (LM (4, 7,=A(108,LOOP, | 
I j |END-STRT,*4-4096) j 

L Jl . ,-X . i 



Note : When the location counter reference 
occurs in a literal, as in the LM instruc- 
tion above, the value of the location coun- 
ter is the address of the first byte of the 
instruction. 

Y-Type Address Constant : This constant has 
the characteristics and format of the A- 
type constant, except for: 
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1. The constant is assembled as a 16-bit 
value and is aligned to a halfword 
boundary, 

2. The implied length is two bytes. 

3. The maximum length of a Y-type address 
constant is two bytes. If length spe- 
cification is used, a length of one or 
two bytes may be designated for a 
relocatable or complex expression and 
one to two bytes for an absolute 
expression. 



WARNING: Specification of relocatable Y- 
type address constants two or fewer bytes 
in length should be avoided in programs to 
be executed under TSS control, since such 
constants do not permit the assignment of 
a complete virtual storage address. 

Y-type address constants should not be 
used in programs to be executed under 
OS control. 

S-Type Address Constant : This constant is 
used to store an address in base- 
displacement form. It may be specified in 
two ways: 

1. As an absolute or relocatable expres- 
sion, for example, SCBETAK 

2. As two absolute expressions, the first 
of which represents the displacement 
value and the second the base regis- 
ter, e.g., S(**00(13>). 

The address value represented by the ex- 
pression in 1 will be broken down by the 
assembler into the proper base register and 
displacement value. An S-type constant is 
assembled as a halfword and aligned on a 
halfword boundary. The leftmost four bits 
of the assembled constant represents the 
base register designation; the remaining 12 
bits the displacement value. 

If length specification is used, only 
two bytes may be specified. S-type address 
constants may be specified as literal. 

U-Type Address Constant : This constant is 
used to reserve storage for the offset of 
an external dummy section. This offset is 
added to the address of the block of 
storage allocated to the external dummy 
sections to address the desired section. 
The constant is specified as a relocatable 
symbol which is defined in a DXD or DSECT 
statement. The implied length of a Q-type 
address constant is 4 bytes, and the boun- 
dary alignment is to a fullword; a length 
of l-<* bytes may be specified. No bit 
length specification is permitted. Q-type 
address constants may be specified in 
literals . 



In the following example, the constant 
VALUE is defined in a DXD or DSECT state- 
ment. To address VALUE, the value of A is 
added to the base address of the block of 
storage allocated for external dummy 
sections. 



J Name j Operation j Operand 
H + + ... 

|A JDC IQ(VALUE) 

L X - L 



V-Type Address Constant : This constant is 
used to reserve storage for the address of 
an external symbol. The constant is speci- 
fied as one relocatable symbol, which need 
not te identified by an EXTRN statement. 
The symbol used is assumed to be an extern- 
al symbol because it is supplied in a V- 
type address constant. 

Specification of a symbol as the operand 
of a V-type constant does not constitute a 
definition of the symbol for this assembly. 
The implied length of a V-type address con- 
stant is four bytes, and boundary alignment 
is to a fullword. A length modifier may be 
used to specify a length of from one to 
four bytes, in which case no such boundary 
alignment occurs. The programmer is cau- 
tioned that address constants which contain 
relocatable values may cause truncation of 
the relocated value if fewer than four 
bytes are allowed for the length of the 
constant. In the following example 12 
bytes will be reserved, because there are 
three symbols. The values of each 
assembled constant will be until the pro- 
gram is loaded. 

r T , T — . — ... — , . . 1 

(Name (Operation (Operand | 

|VCONST(DC | V (SORT, MERGE, CALC) | 

R-Tyre Address Constant : This constant, 
when linking to a reenterable program, sup- 
plies the address of the control section 
that is required by the reenterable program 
for working storage, variable program data, 
and address constants unique to the calling 
program. The programmer need not be aware 
of the name given to the section by the re- 
enterable program; he needs to know only 
the desired entry point within the reenter- 
able program. Use of the R-type address 
constant causes the loader to supply the 
address of the control section as a func- 
tion of the entry point name. 

r „ T T ._ 1 

(Name | Operation (Operand | 

> ._ + „„_ + _. _ ^ 

| RCONST ( DC j R ( SINE ) j 

l X X i 
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In the example above, SINE is an entry 
point, defined by an ENTRY assembler 
instruction, in a reenterable routine. The 
prototype control section for the routine 
is named MATHSECT. The programmer who 
wishes to use the SINE entry needs to write 
only the entry name; the loader will pro- 
vide the address of the prototype section 
MATHSECT in which SINE has been defined by 
t he ENTRY instruction. The assembler will 
generate the equivalent ofs 



f _ _ T . T 

(Name | Operation (Operand 

^ + . _ + _ 

| RCONST | DC j V (MATHSECT) 

i . i. . 1- , 



The rules for specifying an R-type 
address constant are the same as those for 

V-type. 

The assembler automatically associates 
the name of an entry point with the name of 
the CSECT, PSECT, or COM section in which 
it was defined (see the ENTRY assembler 
instruction in Section 3). 



DS ~- Define Storage 

The DS instruction reserves areas of 
storage and assigns names to those areas. 
The use of this instruction is the pre- 
ferred way of symbolically defining storage 
lor work areas, input/output areas, etc. 
The size of a storage area that can be 
reserved by using the DS instruction is 
limited only by the maximum value of the 
location counter. 



r _. T — ._ — _, 

|Name | Operat 

| Symbol | DS 
|or blank) 
1 1 
1 1 
I 1 

L_„ JL 


ion (Operand | 

(One or more operands, j 
(separated by commas, | 
(written in format de- | 
(scribed in following j 

| text | 



The format of the DS operand is identi- 
cal to that of the DC operand; exactly the 
same subfields are employed and are written 
in the same sequence as in the DC operand. 
Although the formats are identical, there 
are two differences in the specification of 
subfields: 

1. The specification of data (subfield 4) 
is optional in a DS operand, but is 
mandatory in a DC operand. 

2. The maximum length that may be speci- 
fied for character (C) and hexadecimal 
(X) field types is 65,535 bytes, rath- 
er than 256 bytes. 



If a DS operand specifies a constant in 
subfield 4 f and no length is specified in 
subfield 3, the assembler determines the 
length of the data and reserves the appro- 
priate amount of storage. It does not 
assemble the constant . The ability to spe- 
cify data and have the assembler calculate 
the storage area that would be required for 
such data is a convenience to the program- 
mer. If be knows the general format of the 
data that will be placed in the storage 
area during program execution, he need only 
show it as the fourth subfield in a DS 
operand. The assembler then determines the 
correct amount of storage to be reserved, 
thus relieving the programmer of length 
considerations* 

If the DS instruction is named by a sym- 
bol, its value attribute is the location of 
the leftmost byte of the reserved area. 
The length attribute of the symbol is the 
length (implied or explicit) of the type of 
data specified. Should the DS have a 
series of operands, the length attribute of 
the symbol is developed from the first item 
in the first operand. Any positioning 
required for aligning the storage area to 
the proper type of boundary is done before 
the address value is determined. Bytes 
skipped for alignment are not set to 0. 

Each field type (for example, hexadeci- 
mal, character, floating point) is asso- 
ciated with certain characteristics (sum- 
marized in Appendix C ) . The associated 
characteristics will determine which field- 
type code the programmer selects for the DS 
operand and what other information he adds, 
such as a length specification or a dupli- 
cation factor. For example, both E 
floating-point fields and F fixed-point 
fields have implied lengths of four bytes. 
The leftmost byte is aligned to a fullword 
boundary. Thus, either code could be spec- 
ified, if it were desired to reserve four 
bytes of storage aligned to a fullword 
boundary. To obtain a length of eight 
bytes, either the E or F field type could 
be specified with a length modifier of 8. 
However, a duplication factor would have to 
be used to reserve a larger area, because 
the maximum length specification for either 
type is eight bytes. Note also that speci- 
fying length would cancel any special boun- 
dary alignment. 

In contrast, packed and zoned decimal (P 
and Z) , character (c), hexadecimal (X), and 
binary (B) fields have an implied length of 
one byte. Any of these codes should be 
accompanied by a length modifier, unless 
just one byte is to be reserved. Although 
no alignment occurs, the use of C and X 
fields permits greater latitude in length 
specif ications j the maximum for either type 
is 65,535 bytes. (Note that this differs 
from the maximum for these types in a DC 
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instruction. ) Unless a field of one byte 
is desired, the length roust be either: (a) 
specified for the c f X, P, Z, or B field 
types, or (b> the data must be specified 
(as the fourth subf ield) f so that the as- 
sembler can calculate the length. 

To define four 10-byte fields and one 
100~fayte field, the respective DS state- 
ments might be: 

r T „. T . . 1 

(Name | Operation (Operand | 

j. 4 __+_ 4 

I FIELD |DS (4CL10 | 

|AJREA |DS JCLIOO | 

L .1.. . . J. . . , . . _J 

Although FIELD might have been specified 
as one 40-byte field, the preceding defini- 
tion has the advantage of providing FIELD 
with a length attribute of 10. This would 
be pertinent when using FIELD as an SS 
machine instruction operand. 

Here are more examples of DS statements: 



(Name j Operation (Operand 



(ONE |DS JCL80 Cone 80-byte field? 

| J {length attribute, 80) 

(TWO (DS |80C (80 1-byte fields j 

I | (length attribute, 1) 

(THREE |DS |6F (six fullwords? length 

| | (attribute, 4) 

(FOUR (DS |D (one doubleword; length 

| | (attribute, 8) 

(FIVE |DS |4H (four half words; 

( j (length attribute, 2) 

t- j. x. . . 1 

Note: A DS statement causes the storage 
area to be reserved but not set to 0*s. No 
assumption should be made as to the con- 
tents of the reserved area. 

Special Uses of the Duplication Factor 

FORCING ALIGNMENT : The location counter 
can be forced to a doubleword, fullword, or 
halfword boundary by using the appropriate 
field type Cfor example, D, F, or H) with a 
duplication factor of 0. This method may 
be used to obtain boundary alignment that 
otherwise would not be provided. For 
example, the following statements would set 
the location counter to the next doubleword 
boundary and then reserve storage space for 
a 128-byte field (whose leftmost byte would 
be on a doubleword boundary) . 

r - T — . , T 1 

| Name (Operation (Operand ( 

j. +„ + « i 

| (DS |0D | 

(AREA (DS (CL128 | 

L ± — . x — . . . . J 



DEFINING FIELDS OF AN AREA : A DS instruc- 
tion with a duplication factor of can be 
used to assign a name to an area of storage 
without actually reserving the area. Addi- 
tional DS and/or DC instructions may then 
be used to reserve the area and assign 
names to fields within the area (and gener- 
ate constants if DC is used) . 



For example, assume that 80-character 
records are to be read into an area for 
processing, and that each record has this 
format: 



Positions 5-10 
Positions 11-30 
Positions 31-36 
Positions 47-5** 
Positions 55-62 



Payroll number 

Employee name 

Date 

Gross wages 

Withholding tax 



The following example illustrates how DS 
instructions might be used to assign a name 
to the record area, then define the fields 
of the area and allocate the storage for 
them. The first statement names the entire 
area by defining the symbol RDAREA; the 
statement gives RDAREA a length attribute 
of 80 bytes, but does not reserve any 
storage. Similarly, the fifth statement 
names a 6-byte area by defining the symbol 
DATE; the three subsequent statements actu- 
ally define the fields of DATE and allocate 
storage for them. The second, ninth, and 
last statements are used for spacing pur- 
poses and, therefore, are not named. 



r r 


r . 


1 


(Name (Operat 

l„ i 


.ion( Operand 

,.., „ i .,.,. . „ mmmmr 


1 

j 


j.„ ^. — 




i 


( RDAREA | DS 


|0CL80 




I (DS 


(CL<* 




(PAYNO |DS 


(CL6 




(NAME (DS 


|CL20 




| DATE | DS 


(0CL6 




(DAY (DS 


|CL2 




(MONTH |DS 


(CL2 




|YEAR (DS 


(CL2 




| (DS 


(CLIO 




(GROSS (DS 


(CL8 




1 FEDTAX | DS 


|CL8 




1 IDS 


(CL18 




L— —.—~JL— .«.—-— 


„. A .. 


—.—j 


DXD — Define 


External Dummy Section 





The DXD instruction defines an external 
dummy section (also referred to as a Pseudo 
Register). When the assembler encounters a 
DXD instruction, it computes the amount of 
storage, and the alignment, required for 
each operand. This information is avail- 
able to the loader, which will compute the 
total length of the external dummy sec- 
tions. The format for the DXD instruction 
is: 
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r — . — T T -„. _ — ^ 

(Name (Operation (Operand | 

H - h + „ H 

(Symbol (DXD [Duplication factor, | 
1 I | type .modifiers, constant | 

i JL X . j, _j 



The name field, which must be specified, 
may not contain a sequence symbol. The 
symbol in the name field is a symbol which 
usually appears as a Q-type constant in the 
operand field of a DC statement in the pro- 
gram- The symbol has a length attribute 
which is calculated by the rules for DC and 
DS instructions. 

The operand of a DXD may be written as 
if it were a DS instruction operand. The 
constant in the operand field is only used 
in determining the byte alignment and total 
length. Multiple operands $nd multiple 
constants are allowed but are only used to 
determine the length of the work area requ- 
est. The storage specified in DXD instruc- 
tions is not initialized to the value spec- 
ified in the constant. 

If more than one external dummy section 
with the same name is encountered by the 
loader, it uses the first section in com- 
puting length. If two or more identically 
named external dummy sections have dif- 
ferent boundary alignments, the loader uses 
the first alignment encountered in comput- 
ing total length. 

An external dummy section may also be 
defined by a Q-type address constant which 
refers to a DSECT name. The alignment is 
doubleword and the length is the highest 
location counter value assigned to that 
DSECT. 



CXD — Cumulative Length External Dummy 
Section 

The CXD instruction allocates a four- 
byte, fullword aligned area in storage 
which will contain, at execution time, the 
sum of the lengths of all external dummy 
sections plus the sum of the lengths of all 
bytes used in aligning external dummy sec- 
tions. This sum is supplied by the loader. 
The instruction format is: 



The following example shows how external 
dummy sections may be used. 



I Name 



I Operation j Operand j 
t -. + +- 4 

| Symbol or blank) CXD |Must be blank | 

The CXD instruction may appear anywhere 
within a program, or, if several programs 
are being combined, it may appear in each 
program. The symbol in the name field has 
the length attribute of 4. 



j. T — . T 

| Name | Operation ( Operand 

(ALPHA (DXD |2DL8 
BETA | DXD 
OMEGA | CXD 
I • 
t • 
Al | DC 
A2 | DC 



ROUTINE B 
Name (Operation (Operand 



ROUTINE A 



(2DL8 

|%FL<* 

I 

I 

1 

| QC ALPHA) 

| Q (BETA) 

I 



GAMMA 
DELTA 



A3 

A<4 



i 

Name 



| DXD 
| DXD 
I • 
! - 
(DC, 
(DC 
I • 

I * 

-J. « 



|5D 
I10F 



JQ (GAMMA) 
j Q (DELTA) 



ROUTINE C 



k~ 



j Operation j Operand 



DELTA | DXD 
EPSILON|DXD 
I • 
1 * 
M (DC 

AS | DC 



|10F 

|4H 

i 

i 

| Q (DELTA) 
JQ(EPSILON) 



Each of the three routines is requesting a 
work area. Routine A requests 2 double- 
words and 4 fullwords. Routine B request 5 
doubiewords and 10 fullwords. Routine C 
requests 10 fullwords and 4 half words. At 
the time these routines are loaded, the sum 
of the individual lengths, plus the length 
of any alignment bytes used, will be placed 
in the fullword storage area allocated by 
the CXD instruction labeled OMEGA. Routine 
A can then allocate the amount of storage 
that is specified in the CXD location. 
Note that routines B and C may communicate 
with each other by placing information in 
the dummy section named DELTA. No othef 
interroutine communication is possible in 
the example shown because no other corres- 
ponding external dummy sections have been 
defined in routines A, B, or C. 
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CCW — Define Channel Command Word 

The CCW instruction provides a con- 
venient way to define and generate an 8- 
byte channel command word aligned at a 
doubic^word boundary. The internal machine 
format of a channel command word is shown 
in Table 3- The format of the CCW instruc- 
tion statement is: 



+ 1 



r T «. T , 

(Name j Operation) Operand 
H „™„ + _ + . 

(Symbol |CCW | Four operands, sepa- 
|or blankj (rated by commas, spec- 

ifying contents of 
(channel command word 
(in format described in 
j following text 



I . i. 



J 



The four operands must appear, written 
from left to right, as: 



An absolute expression that specifies 
the command code. This expression's 
value is right- justified in byte 1. 



2. An absolute, relocatable, or complex 
relocatable expression specifying the 
data address. The value of this ex- 
pression is right- justified in bytes 

2-4. 



Table 3. Channel Command Word 

r T r . : 

1 Byte I Bits | Usage 



1 

2-4 

5 

6 
7-8 



0-7 
8-31 
32-36 
37-39 
40-47 
48-63 



Command code 
Data address 
Flags 
Must be 
Set to 
Count 



-H 






I CAUTION : The CCW command does not provide 



a field large enough to contain a 32-bit 
address. 



LISTING CONTROL INSTRUCTIONS 

These instructions identify an assembly 
listing, provide blank lines in the list- 
ing, and designate how much detail is to be 
included. In no case are instructions or 
constants generated in the object program. 

TITLE — Identify Assembly Output 

TITLE enables the programmer to identify 
the assembly output, and has the formats 



r — ' 

(Name 

| Name 

lor blank) 



j Operation j Operand 
4 +. 



(TITLE 



(Sequence of charac- 
ters, enclosed in 
| apostrophes 



An absolute expression that specifies 
the flags for bits 32-36 and f s for 
bits 37-39. The value of this expres- 
sion is right- justified in byte 5 
(byte 6 is set to 0). 

An absolute expression that specifies 
the count. The value is right- 
justified in bytes 7-8. 

This is an example of a CCW statement: 



| T T , ., — T 

(Name (Operation) Operand | 

I | CCW ( 2,REAEAREA,X , 48 , ,80 ( 

I . JL-- .. .-__X .. J 

The form of the third operand sets bits 
37-3 9 to 0, as required. The bit pattern 
of this operand is: 



32-35 
0100 



36-39 

1000 



A symbol appearing in the name field of 
the CCW instruction is assigned the address 
value of the leftmost byte of the channel 
command word. The length attribute of the 
symbol is 8. 



The name field may contain a name of 
from one to four alphabetic or numeric 
characters, in any combination. The con- 
tents of the name field are placed in the 
assembly output to serve as identification 
for punching output cards. Only the first 
TITLE statement in a program may have a 
name in the name field? for all subsequent 
TITLE statements the field should be blank. 

The operand field may contain up to 100 
characters, enclosed in apostrophes. The 
contents of the operand field are printed 
at the top of each assembly listing page. 

If a character string containing at 
least one single apostrophe is to be sub- 
stituted for an operand in a TITLE state- 
ment, it must meet the requirements 
described in Section 7, under "Free 
Apostrophes. * 

A program may contain more than one 
TITLE statement. Each statement provides 
the heading for pages in the assembly list- 
ing that follow it, until another TITLE 
statement is encountered. Each TITLE 
statement encountered causes the listing to 
be advanced to a new page (before the head- 
ing is printed). For example, assume that 
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this statement is the first TITLE statement 
to appear in a program: 

r T — . . — T — ... _ ^ 

| Name (Operation (Operand | 

F „ — + + 4 

I (TITLE J f FIRST HEADING' | 

i-„„X A . — J 

then this heading appears at: the top of 
each following page: FIRST HEADING 

If this statement occurs later in the 
same program: 

r T T B . 1 

(Name (Operation (Operand | 

^ „ + 1 ___. i 

| [TITLE ('A NEW HEADING 1 j 

l .„!._„. X • . 1 

then each following page begins with this 

heading: A NEW HEADING 

EJECT — Start New Page 

EJECT causes the next line of the list- 
ing to appear at the top of a new page. 
This instruction provides a convenient way 
to separate routines in the program list- 
ing. The format is: 



(Name (Operation! Operand 

fr~— + + 

| Blank j EJECT (Not used 

L X JL — 



1 



If the next line of the listing normally 
appears at the top of a new page, the EJECT 
statement has no effect. Two EJECT state* 
ments may be used in succession to obtain a 
completely blank page. 



SPACE 



Space Listing 



This instruction inserts one or more 
blank lines in the listing. The format is: 

| Name | Operation | Operand | 

| Blank | SPACE (Decimal value or blank | 

L- 4. A- J 

A decimal value specifies the number of 
blank lines to be inserted in the assembly 
listing; a blank operand causes one blank 
line to be inserted. If this value exceeds 
the number of lines remaining on the list- 
ing page, the statement will have the same 
effect as an EJECT statement. 

PRINT — Print Optional Data 

The PRINT instruction controls what is 
assembled into the list data set. Through 
use of this instruction, lines or data may 



be included or omitted from the listing 
created during assembly. The object module 
created is not affected. 



Note : The PRINT assembler instruction is 
not to be confused with the PRINT c airman d, 
The instruction determines what lines or 
data are to be included or not in the list- 
ing i the command is necessary to cause the 
listing to be printed. CA special case, 
however, is when a nonconversational user 
elects to have his listing printer?, immedi- 
ately on SYSOUT? in this case, any PRINT 
assembler instructions will affect the out- 
put listing just as it would if the list 
data set had been retained internally.) 



The format for the PRINT instruction is: 



(Name (Operation! Operand j 

| Blank j PRINT (One to three operands | 

I- JL X- 1 

One to three of these operands are used: 

ON - Listing is printed. 

CFF - No listing is printed. 

GEN - All statements generated by macro 
instructions, backward AGO 
inst mictions, or statements in a 
copied element are printed. 

FULLGEN - All statements generated by macro 
instructions, backward AGO state- 
ments, conditional instructions 
as they are encountered, or 
statements in a copied element 
are printed. 

NOGEN - Statements generated by macro 
instructions, backward AGO 
instructions, or statements in a 
copied element are not printed. 
The macro instruction or COPY 
statement" itself will appear in 
the listing. 

DATA - Constants are printed in full in 
the listing. 

NODATA - Only the first eight bytes (16 

hexadecimal digits) , or the first 
constant, whichever is shorter, 
of the assembled data is printed 
in the listing. 

A program may contain any number of 
PRINT statements. One PRINT controls the 
printing of the assembly listing until 
another PRINT is encountered. If no PRINT 
assembler instruction is issued, the fol- 
lowing is assumed: 
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t - T - T . -1 

(Name | Operation! Operandi | 

,.„ + + 4 

| (PRINT |ON,NODATA,GEN | 

L 1 X . I 

For example « if 

r „ T T — 1 

| Name | Opera t ion | Opera nd j 

k ^ + i 

| |DC |XL256 , 00 i | 

appears in a program, 256 fcytes of O's are 
assembled. If 



ICTL 



Input Format Control 






[Name (Operation (Operand 
t + + „ 

I (PRINT (DATA 

is the last PRINT to appear before the DC 
statement, the 256 bytes of f s are printed 
in the assembly listing. However , if 



f T T . — t 

(Name (Operation (Operand | 

I + + 4 

| | PRINT (NODATA | 



This instruction allows the programmer 
to alter the normal format of source state- 
ments that originate on punched cards? it 
has no effect on statements entered through 
a keyboard. ICTL must precede all other 
statements in the source program that ori- 
ginate from cards; it may be used only 
once. The format of the ICTL instruction 
statement is: 



r T T ^ 

(Name (Operation (Operand ( 

k _ + __ + 4 

| Blank ( ICTL (1-3 decimal values of the| 
I I (form b f e f c | 

i- x , j . j 

Operand b specifies the begin column of 
the source statement. It must always be 
specified, and must be from 1-40, 
inclusive. 

Operand e specifies the end column of 
the last source statement. The end column, 
when specified, must be from 41-80, inclu- 
sive? when not specified, it is assumed to 
be 71. The column after the end column is 
used to indicate whether the next card is a 
continuation card. 



is the last PRINT before the DC statement, 
only eight bytes of O's are printed in the 
assembly listing. 

Whenever an operand is omitted, the as- 
sembler assumes the operand specification 
made in the most recent PRINT statement. 



PR OGRAM CONTROL INSTRUCTIONS 

Program Control instructions: 

• Specify the end of an assembly. 

• Set the location counter to a value or 
word boundary. 

• Insert previously written coding in the 
program. 

• Specify the placement of literals in 
storage. 

• Check the sequence of input cards. 

• Indicate statement format. 

Except for the CNOP and COPY instruc- 
tions, none of these assembler instructions 
generate instructions or constants in the 

object program. 



Operand c specifies the continue column 
of the source statement. The continue 
column, when specified, must be from 2-40 
and must be greater than b. If the con- 
tinue column is not specified, or if column 
80 is specified as the end column, the as- 
sembler assumes that there are no continua- 
tion cards and that all statements are on a 
single card. 

If no ICTL statement is used in the 
source program, the assembler assumes that 
1, 71, and 16 are the begin, end, and con- 
tinue columns, respectively. An error in 
the specification of b causes the statement 
to be ignored. If e is in error, the end 
column defaults to 71. If the specifica- 
tion for c is in error, the continue column 
defaults to 16; if this default conflicts 
with the begin or end column specifica- 
tions, continuation cards will not be 
allowed. 

The next example designates the begin 
column as column 25. Since the end column 
is not specified, it is assumed to be 
column 71. No continuation cards are reco- 
gnized because the continue column is not 
specified. 

r t — t ■ 1 

(Name (Operation (Operand ( 

I (ICTL (25 | 
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ISEQ 



Input Sequence Checking 



ISEQ checks the sequence of source 

statements that originate from cards. The 

format of the ISEQ instruction statement 

is: 

r T _ r 1 

(Name (Operation I Operand | 

k + + .„ 4 

| Blank) ISEQ (Two decimal values of the| 
| | (form l f r, or blank J 

l- -X . . JL— —, . . J 

The operands 1 and r specify the left- 
most and rightmost columns of the field in 
the input cards to be checked. Operand r 
must be equal to or greater than operand 1. 
columns to be checked must not be between 
the "begin" and "end* columns. 

Sequence checking begins with the first 
card following the ISEQ statement. Com- 
parison of adjacent cards makes use of the 
8-bit internal collating sequence. ISEQ 
with a blank operand terminates the opera- 
tion; checking may be resumed with another 
ISEQ. 

Sequence checking is performed only on 
statements in the source program. State- 
ments inserted by the COPY assembler 
instruction or generated by a macro 
instruction are not checked for sequence. 



statement appears. Absolute expressions 
irust not be negative. 

The location counter is set to the value 
of the expression in the operand. An abso- 
lute value sets the location counter the 
specified number of virtual storage loca- 
tions higher than the beginning of the con- 
trol section, which is always 0. If the 
operand is omitted, the location counter is 
set to a location that is one byte higher 
than the maximum location assigned for the 
control section up to this point. 

An ORG statement must not be used to 
specify a location below the beginning of 
the control section in which it appears. 
For example, 

r ._ T . — T . . . . — . — « t 

(Name (Operation (Operand f 

t + + 1 

| |ORG l*-500 | 

l JL . J -. J 

is invalid if it appears less than 500 
bytes from the beginning of the current 
control section. 

If the location counter is to be reset 
to a value that is one byte beyond the 
highest location yet assigned (in the con- 
trol section), this statement should be 
used: 



PUNCH — Punch a Card 

Tht* PUNCH assembler instruction is in 
t he language for compatibility with other 
l HM ttNHomhler lanquaqes. It will produce 
.i lino in the printed listing only. 

KE PRU -- Reproduce Following Card 

The REPRO assembler instruction, too, 
is in the language for compatibility with 
other IBM assemblers. It will produce 
lines in the printed listing only. 

ORG — Set Location Counter 

ORG alters the setting of the location 
counter for the current control section. 
The format is: 



, T T _. * ., 

(Name | Operation (Operand | 

H + _. + 4 

I Blank | ORG | Expression , or blank | 

Any symbols in the expression must have 
been previously defined and must not be 
external . If the expression is relocat- 
able, it must not be complex; the unpaired 
relocatable symbol must be defined in the 
same control section in which the ORG 



( Name } Operation j Operand 



(ORG 



i 
.X- 



If previous ORG statements have reduced 
the location counter for the purpose of 
redefining a portion of the current sec- 
tion, an ORG statement with an omitted 
operand can be used to terminate the 
effects of such statements and restore the 
location counter to its highest setting. 

LTORG -- Begin literal Pool 

The LTORG instruction causes all 
literals thus far encountered in the source 
program to be assembled at appropriate 
boundaries, starting at the first double- 
word boundary following the LTORG state- 
ment. The format of the instruction is: 



(Name (Operation (Operand j 

(Symbol (LTORG (Not used ( 

(or blank) | | 

-X 









The symbol represents the address of the 
first byte of the literal pool; it has a 
length attribute of 1. 
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Sp ecial Addressing C o nsideration 

Any literals used after the last LTORG 
statement are placed at the end of the 
first control section. If there are no 
LTORG statements, all literals used in the 
program are placed at the end of the first 
control section. In these circumstances, 
the programmer must ensure that the first 
cont.ro I section is always addressable. 
This means that the base address register 
tor the first control section should not be 
v'ii.irnjed through use in subseguent control 

actions. If the programmer does not want 
i > receive a register for this purpose, he 
place an LTORG statement at the end of 
control section, thereby ensuring that 
literals appearing in that section are 



each 

a LI 

add* eiisable 



In programs which define one or more 
prototype control sections (PSECTs), liter- 
al address constants are placed in a separ- 
ate literal pool at the end of the first 
prototype control section. In these cir- 
cumstances, the programmer also must ensure 
that the first prototype control section is 
always addressable. 

Duplicate Literals 

If duplicate literals occur within the 
range controlled by one LTORG statement, 
only one literal is stored. Literals are 
considered duplicates only if their speci- 
fications are identical. A literal will be 
stored even if it appears to duplicate 
another literal, if it is an A-type address 
constant containing any reference to the 
locat ion counter. 

These examples illustrate how the assem- 
bler stores pairs of literals, if the pla- 
cement of each pair is controlled by the 
same LTORG statement: 



X • FO • 
CO' 

XL3' 0' 
HLa'O - 



Both are stored 



Both are stored 



routine followed by parameters such as 
channel command words (CCW) . 

CNOP ensures the alignment of the loca- 
tion counter setting to a halfword, full- 
word, or doubleword boundary. If the loca- 
tion counter is already properly aligned, 
the CNOP instruction has no effect. If the 
specified alignment reguires the location 
counter to be incremented, one to three 
no-operation instructions are generated. 
Each uses two bytes. 

This is the format of the CNOP 
instruction; 

r T T . 1 

(Name |Operation(Operand 1 

H + — + 4 

| Blank) CNOP JTwo absolute expressions | 
j j j of the form b,w | 

t x x — . . . J 

Any symbols used in the expressions in 
the operand field must have been previously 
defined. 

Operand b specifies at which byte in a 
word or doubleword the location counter is 
to be set; b can be 0, 2, 4 # or 6. Operand 
w specifies whether byte b is in a fullword 
(w=4) or doubleword (w=8). These pairs of 
fc and w are valid: 

fc,w Specifies 

0,4 Beginning of word 

2,4 Middle of word 

0,8 Beginning of doubleword 

2,8 Second halfword of doubleword 

4,8 Middle (third halfword) of doubleword 

6,8 Fourth halfword of doubleword 

The position in a doubleword that each 
of these pairs specifies is shown in Figure 
10. Note that both 0,4 and 2,4 specify two 
locations in a doubleword. 

Assuming that the location counter is 
currently aligned at a doubleword boundary, 
the CNOP instruction in this sequence 



A(**4) 
A(**4) 

X* FFFF* 
X'FFFF' 



Both are stored 



Identical; the first is stored 



CNOP — Conditional No Operation 

This instruction allows the programmer 
to align an instruction at a specific word 
boundary. If any bytes must be skipped to 
align the instruction properly, the assem- 
bler ensures an unbroken instruction flow 
by generating no-operation instructions. 
This facility is useful in creating calling 
sequences consisting of a linkage to a sub- 



r T T 1 

(Name | Operation | Operand | 

| | CNOP | 0,8 | 

| [BASR (2,14 | 

has no effect; it is printed in the assem- 
bly listing. However, this sequence 

r T T 1 

(Name [Operation (Operand | 

| | CNOP | 6, 8 | 

| | BASR | 2, 14 j 

l -X X i 



so 



causes three branch-on-conditions (NO-OPs) 
to be generated, thus aligning the BASR 
instruction at the last half word in a 
doubleword, as follows: 

(Name (Operation (Operand | 

H — + „ + — ^ 

I |BCR (0,0 | 

I (BCR (0,0 | 

| |BCR (0,0 | 

t (BASR | 2, 14 I 

L_„. J . _X . J 

f . . 1 

j Doubleword | 

H . T „ 4 

| Word j Word j 

j. T x „ T ^ 

| Half word J Half word j Half word j Half word | 

j. — T — + - — T — + — T — + — T „, — ^ 

| Byte | Byte | Byte | Byte | Byte | Byte | Byte ( Byte | 

j. _ — X X .X X X X X <| 

|0,4 2,4 0,4 2,4 | 

(0,8 2,8 4,8 6,8 | 

i . . . «. _j 

Figure 10. CNOP Alignment 

After the BASH instruction is generated, 
the location counter is at a doubleword 
boundary, thereby ensuring an unbroken 
instruction flow. 

copy — Copy Predefined Source Coding 

The COPY instruction obtains source lan- 
guage coding from a library and includes it 
in the program currently being assembled* 
This is the format: 

r _. T T . . -^ 

(Name (Operation (Operand | 

> + .. x 4 

j Blank | COPY (One symbol j 

l x x 1 

The operand is a symbol that identifies 
the section of coding to be copied* The 
assembler inserts the requested coding 
immediately after the COPY statement is 



encountered. The requested coding must not 
contain another COPY statement. If identi- 
cal COPY statements are encountered, the 
coding they request is brought into the 
program each time. The control section in 
effect at the time of the COPY statement is 
not automatically resumed after the copied 
element; therefore, if the copied element 
contains one or more control section state- 
ments, all coding following the COPY state- 
ment C until another control section state- 
ment is encountered) will be considered as 
part of the last control section in the 
copied element * 



END — End Assembly 

END terminates the assembly of a pro- 
gram. It may also designate a point in the 
program, or in a separately assembled pro- 
gram, to which control may be transferred 
after the program is loaded. The END 
instruction must always be the last state- 
ment in the source program, in this format: 

j Name j Operation j Operand | 

j Blank j END (Relocatable or absolute j 



(expression, or blank 

-X-. — . 



The operand specifies the point to which 
control is transferred when loading is com- 
plete. This point is usually the first 
machine instruction in the program, as 
shown in this sequences 



(Name (Operation (Operand 

NAME |CSECT 
AREA |DS 
BEGIN j BASR 

j USING 

I- 



(50F 
(2,0 
I*, 2 
I 
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SECTION 6: 



INTRODUCTION TO MACRO LANGUAGE 



Macro language is an extension of the 
TSS Assembler language. 

The macro language provides the program- 
mer with a convenient way to generate a 
desired, previously prepared seguence of 
assembler language statements with only one 
statement, a macro instruction. 

The seguence of generated statements is 
determined in a previously written defini- 
tion and, when invoked with a macro 
instruction, placed in line with his code. 
Thin definition may be written only once, 
iitor€-d # and used repeatedly in one or more 
programs. The definition may be created by 
a programmer for his sole use, or it may be 
shared by many users in a system. 

This facility simplifies coding pro- 
grams, reduces the chance of programming 
errors, and ensures that standard seguences 
of assembler language statements are used 
to accomplish desired functions. 

An additional facility, called condi- 
tional assembly, allows specification of 
assembler language statements, which may or 
may not be assembled, depending upon condi- 
tions evaluated at assembly time. These 
conditions are usually tests of values, 
which may be defined, set, changed, and 
tested during the course of the assembly 
itself. The conditional assembly facility 
can be used without macro instruction 
statements. 



MACRO INSTRUCTION STATEMENT 

A macro instruction statement, or simply 
a macro instruction, is a source program 
statement that is processed by the assem- 
bler, just as assembler language statements 
are source program statements that are pro- 
cessed by the assembler. 

The assembler generates a seguence of 
assembler language statements for each 
occurrence of the same macro instruction. 
The generated statements are then processed 
like any other assembler language 
statement . 

Three types of macro instructions may be 
written: positional, keyword, and 
mixed-mode. 

Positional macro instructions permit the 
programmer to write the operands of a macro 
instruction in a fixed order. Keyword 
macro instructions permit him to write the 



operands in a variable order. Mixed-mode 
macro instructions permit him to use the 
features of both positional and keyword 
macro instructions in the same macro 
instruction. 



KACRQ DEFINITION 

Before a macro instruction can be 
assembled, a macro definition must be 
available to the assembler. 

A macro definition is a set of state- 
ments that provides the assembler with: 
(a) the mnemonic operation code and the 
format of the macro instruction, and (b) 
the seguence of statements the assembler 
generates when the macro instruction 
appears in the source program. 

Every macro definition consists of a 
macro definition header statement, a macro 
instruction prototype statement, one or 
more model statements, and a macro defini- 
tion trailer statement. In addition, COPY 
statements MEXIT, MN0TE, and conditional 
assembly instructions may be used. 

Header and trailer statements indicate 
to the assembler the beginning and end of a 
macro definition. 

The prototype statement specifies the 
mnemonic operation code and format of the 
iracro instruction. 

Model statements are used by the assem- 
bler to generate the assembler language 
statements that replace each occurrence of 
the macro instruction. 

COPY statements can be used to copy 
model statements, MEXIT, MN0TE, or condi- 
tional assembly instructions from a system 
library into a macro definition. 

MEXIT can be used to terminate process- 
ing of a macro definition. 

MNOTE can be used to generate an error 
message when the rules for writing a parti- 
cular macro instruction are violated. 

The conditional assembly instructions 
may be used to vary the seguence of state- 
ments generated for each occurrence cf a 
macro instruction. Conditional assembly 
instructions may also be used outside macro 
definitions, that is, among the assembler 
language statements in the program. 
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SOURCES OF MACRO DEFINITIONS 

Macro definitions may be secured from 
three sources and are searched for in the 
following order: 

1 . User source statements 

2. Supplementary macro library 

3. System macro library 

The same macro definition may be made 
available to more than one source program 
by placing the macro definition in a macro 
library. A macro library is a collection 
of macro definitions that can be used by 
several assembler language programs* Once 
a macro definition has been placed in a 
macro library, it may be used by writing 
its corresponding macro instruction in a 
source program, if the user has access to 
that library. 



SYSTEM MACRO INSTRUCTIONS 

The macro instructions that correspond 
to macro definitions prepared by IBM are 
called system macro instructions; they are 
described in Assembler User Macro 
Instructions, 



VARYING THE GENERATED STATEMENTS 

Each time a macro instruction appears in 
the source program, it is replaced by the 
same sequence of assembler language state- 
ments, unless one or more conditional as- 
sembly instructions appear in the macro 
definition. Conditional assembly instruc- 
tions are used to vary the number and for- 
mat of the generated statements. 



VARIABLE SYMBOLS 

A variable symbol is assigned different 
values by either the programmer or the as- 
sembler. When the assembler uses a macro 
definition to determine what statements are 
to replace a macro instruction variable 
symbols in the model statement are replaced 



with the values assigned to them. By 
changing the values assigned to variable 
symbols, the programmer can change parts of 
the generated statements. 

A variable symbol is written as an 
ampersand followed by from one through 
seven letters and/or digits, the first of 
which oust be a letter. Elsewhere, two 
ampersands must be used to represent an 
ampersand* 



Types of Variable Symbols 

There are three types of variable sym- 
bols: symbolic parameters, system variable 
Symbols, and SET symbols. SET symbols are 
further broken down into SETA, SETB f and 
SETC symbols. The three types of variable 
symbols differ in the way they are assigned 
values. 

Assigning Values to Variable Symbols 

Symbolic parameters are assigned values 
by the programmer each time he writes a 
macro instruction. 

System variable symbols are assigned 
values by the assembler each time it pro- 
cesses a macro instruction. 

SET symbols are assigned values by the 
programmer's use of conditional assembly 
instructions. 

Global SET Symbols 

The values assigned to SET symbols in 
one macro definition may be used to vary 
the statements that appear in other macro 
definitions. All SET symbols used for this 
purpose must be defined by the programmer 
as global SET symbols. All other SET sym- 
bols Cthat is, those which may be used to 
vary statements that appear in the same 
macro definition) must be defined by the 
programmer as local SET symbols. Local SET 
symbols and the other variable symbols 
Cthat is, symbolic parameters and system 
variable symbols) are local variable sym- 
bols. Global SET symbols are global vari- 
able symbols. 
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SECTION 7: 



HOW TO PREPARE MACRO DEFINITIONS 



A macro definition, which roust appear in 
the* .source program before any macro 
instruction that references it, consists 
ot : 

• A macro definition header statement. 

• A macro instruction prototype 

statement. 

• Zero or more model statements, COPY 
statements, MEXIT, MNOTE, or condition- 
al assembly instructions. 

• A macro definition trailer statement. 

Except for MEXIT, MNOTE, and conditional 
assembly instructions, this section 
describes all statements that may be used 
to prepare macro definitions. Conditional 
assembly instructions are described in Sec- 
tion 9. MEXIT and MNOTE instructions are 
described in Section 10. 



MACRO 



Macro Definition Header 



The macro definition header statement, 
indicating the beginning of a iracro defini- 
tion, must be the first statement, with 
this format: 



| Name j Operation j Operand 
I Blank | MACRO (Blank 






i 



r T _. T 1 

(Name [Operation (Operand | 

(Symbolic (Symbol |Zero or more symbolic) 
(parameter! (parameters, separated) 
(or blank | |by commas | 

i x x . . J 

The symbolic parameters (see "Model 
Statements,* below) are used in the macro 
definition to represent the name field and 
operands of the corresponding macro 
instruction. The name field of the proto- 
type statement may be blank, or it may con- 
tain a symbolic parameter. 

The symbol in the operation field is the 
mnemonic operation code that must appear in 
all iracro instructions that refer to a 
sacro definition. The mnemonic operation 
code must not be the same as the mnemonic 
operation code of another macro definition 
in the source program or of an assembler 
instruction. If a macro definition in a 
source program has the same mnemonic as a 
machine operation, the macro definition is 
used during assembly. If the macro defini- 
tion is stored in a library, however, the 
machine operation will be used. 

The operand field may contain or more 
symbolic parameters separated by commas. 

This is a prototype statement: 

(Name (Operation (Operand | 

k + x. 



MEND — Macro Definition Trailer 



| 4NAME | MOVE 

L— A _ 



jtTO,tFROM 



The trailer statement, indicating the 
end of a macro definition, must be the last 
statement, with this format: 



STATEMENT FORMAT 



r T T ^ 

(Name |Operation|Operand | 

L X^ X. 4 

| Blank (MEND (Blank | 

i X X . J 



MACRO INSTRUCTION PROTOTYPE 

The macro instruction prototype state- 
ment, called the prototype statement, spe- 
cifies the mnemonic operation code and the 
format of all macro instructions that refer 
to the macro definition. It must be the 
second statement of every macro definition, 
with this format: 



The prototype statement may be written 
in a format different from that used for 
other assembler language statements. The 
normal format was described in Section 2, 
under "Assembler Language Coding Conven- 
tions." The alternate format described 
here allows the programmer to write an 
operand on each line, and intersperse 
operands and comments in the statement. 

In the alternate format, as in the nor- 
mal, the name and operation fields must 
appear on the first line of the statement, 
and at least one blank must follow the 
operation field on that line. Both types 
of statement format may be used in the same 
prototype statement. 
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The rules for using the alternate format 
for punched cards are: 

1. If an operand is followed by a comma 
and a blank, and the column after the 
end column contains a nonblank charac- 
ter, the operand field may be con- 
tinued on the next line, starting in 
the continue column. More than one 
operand may appear on the same line, 

2. Comments may appear after the blank 
that indicates the end of an operand, 
up to and including the end column* 

3. If , in the next card, the operand 
field starts after the continue 
column, the information entered on 
that line is considered to be com- 
ments, and the operand field of the 
previous card is considered ter- 
minated. Any subsequent continuation 
lines are considered comments. 



The following examples illustrates 
the normal statement format, (b) the 
alternate statement format, and Cc) the 
combination of both statement formats. 



(a) 



h 



Name j Oper- j Operand 
jationj 



NAME! 



NAME2 



NAMES 



JOP1 



Comments | | 
i i 



|OPEHANDl,OPERAND2,OPERAN(X| 
| |D3 THIS IS THE NORMAL |X| 
| (STATEMENT FORMAT | J 

|OP2 (OPERANDI, THIS IS THE AL|Xj 
j |OPERAND2,OPERAND3 TERNA |X| 
| ITE STATEMENT FORMAT j | 

|OP3 (OPERANDI, THIS IS A COMB|X| 
| | OPERAND2 ,OPERAND3 , OPERAN j X j 
| (Di$,0PERAND5 INATION OF |X| 
| (BOTH STATEMENT FORMATS j j 

.X .-X . . . 



Note : A prototype statement may be written 
on as many continuation lines as there are 
operands. 

The rules for using the alternate state- 
ment format at a keyboard are: 

1. If an operand is followed by a comma 
and either a blank or a horizontal 
tab, and the remaining text contains a 
keyboard continuation character prior 
to the return, the operand field may 
be continued on the next line, start- 
ing in the first column of the state- 
ment area. If this form of continua- 
tion is used, an operand must appear 
on a single line. More than one 
operand, however, may appear on the 
same line. 

2. Comments may appear after the blank or 
horizontal tab that indicates the end 
of an operand, up to the column con- 
taining the return. 

3. If text contains the keyboard con- 
tinuation character prior to the 
return, and the next line starts in 
the first column of the statement 
area, the information entered on the 
next line is considered to be an 
operand. However, if the first column 
of the statement area is blank or con- 
tains a horizontal tab character, the 
information entered on the next line 
is considered to be comments, and the 
operand field is considered ter- 
minated. Any subsequent continuation 
lines are considered to contain only 
commands . 



MODEL STATEMENTS 

These are the macro definition state- 
ments from which the desired sequences of 
assembler language statements are 
generated. One or More model statements 
may follow the prototype statement. A 
zrodel statement consists of one to four 
fields Cleft to right) : name, operation, 
operand, and comments. 

The name field may be blank, or it may 
contain a symbol or symbolic parameter. 

The operation field may contain: any 
machine instruction mnemonic operation 
code; any assembler mnemonic operation code 
except COPY, END, ICTL, ISEQ, START, MACRO, 
and MEND? or the mnemonic operation code of 
a user macro instruction or of a system 
macro instruction. Variable symbols may 
not be used to generate the following as- 
sembler mnemonic operation codes s COPY, 
END, ICTL, ISEQ, REPRO, START, MACRO, and 
MEND. 

Variable symbols may not be used in the 
name field nor in the operand fields of the 
following instructions: COPY, END, ICTL, 
ISEQ, REPRO, and START. 

The operand field may contain symbols, 
symbolic parameters, or other combinations 
of characters, with the exception noted un- 
der "Free Apostrophes" below. 

The coirments field may contain any com- 
bination of characters. 



1. A prototype statement may be written 
on as many continuation lines as there 
are operands. 



Free Apostrophes 

A free apostrophe is: 
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• A single apostrophe not immediately 
preceded or followed by another 
apostrophe. 

• The last apostrophe in a sequence con- 
taining an odd number of consecutive 
apostrophes, 

A macro instruction operand may include 
free apostrophes. If a macro definition is 
to treat such an operand in an apostrophe 
delimited field, the character positions 
which in ay contain free apostrophes roust be 
doubled by using concatenated substring 
notations. Substring notation is discussed 
in Section 9. 

Apostrophe delimited fields appear as 
operands of TITLE (Section 5), SETC (Sec- 
tion 9) f MNOTE (Section 10) instructions, 
or as terms of character relations in the 
operand fields of AIF or &ETB instructions 
(Section 9). 



S Y MBO LIC PARAMETERS 

A symbolic parameter is a type of vari- 
able symbol that is assigned values by the 
pi og rammer when he writes a macro instruc- 
tion- The programmer may vary statements 
that are generated for each occurrence of a 
macro instruction by varying the values 
assigned to symbolic parameters. 

A symbolic parameter consists of an 
ampersand followed by from one to seven 
letters and/or digits, the first of which 
must be a letter* Elsewhere, two amper- 
sands must be used to represent an amper- 
sand* The programmer should not use SSYS 
as the first four characters of a symbolic 
parameter. 

These are valid symbolic parameters! 



& READER 


&LOOP2 


&A23456 


*N 


*X*4F2 


4S4 



The following is an example of a macro 
definition. Note that the symbolic parame- 
ters in the model statements appear in the 
prototype statement. 



j Name [Operation (Operand 


1 

I 


|. + + 


4 


Header I (MACRO | 




Prototype) £NAME| MOVE ( STO,£FROM 




Model | £NAME|ST | 2 , SAVE 




Model -l 1L |2,SFROM 




Model | |ST |2,rro 




Model | (L (2 ff SAVE 




Trailer 1 (MEND | 


j 



Symbolic parameters in model statements 
are replaced by the characters of the macro 
instruction that correspond to the symbolic 
parameters. 

In the following example* the characters 
HERE, FIELDA, and FIELDB of the MOVE macro 
instruction correspond to the symbolic 
parameters &NAME, £TO, and fcFROM, respec- 
tively, of the MOVE prototype statement. 

r _. T : _. „ T .___ — . . . 1 

( Name (Operation (Operand | 

j. + — . — + -_ .„„„< 

|EERE (MOVE (FIELDA, FIELDB | 

Any occurrence of the symbolic parame- 
ters £NAME, CTO, and 4FROM in a model 
statement will be replaced by the charac- 
ters HERE, FIELDA, and FIELDB, If the pre- 
ceding macro instruction were used in a 
source program, these assembler language 
statements would be generated: 



I name (Operation (Operand 
j. + + . 



(HERE (ST 



These are invalid symbolic parameters: 



|L 
|ST 

-JL 



j 2, SAVE 
| 2 , FIELDB 
1 1 2, FIELDA 
|2,SAVE 

-A . - 



CARDAREA (first character is not 
ampersand) 

4 256B (first character after amper- 
sand is not letter) 

£AREA2**56 (more than seven characters 
after ampersand) 

fcBCD%34 (contains special character 

other than initial ampersand) 

SIN AREA (contains special character 
(blank) other than initial 
ampersand) 

Any symbolic parameters in a model 
statement must appear in the prototype 
statement of the macro definition. 



The example below illustrates another 
use of the MOVE macro instruction, using 
operands that are different from those that 
appear in the preceding example. 



Macro 



r T r — . — 

| Name | Ope rati on | Operand 



, 1 

1 
4 



| LABEL | MOVE 



Generated | LABEL | ST 
Generated} (L 

Generated) |ST 
Generated) |L 

i A 



| IN, OUT 

I 

| 2, SAVE 

|2 f OUT 

I 2, IN 
| 2, SAVE 

„X _. 
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If a symbolic parameter appears in the 
comments field of a model statement, it is 
not replaced by the corresponding charac- 
ters of the macro instruction. 



Concatenating Symbolic Parameters With 
Other Characters or Other Symbolic 
Parameters 

It «* symbolic parameter in a model 
ii t at omen t is immediately preceded or fol- 
lowed by other characters or another sym- 
bolic parameter, the characters that corre- 
spond to the symbolic parameter are combi- 
ned, in the generated statement, with the 
other characters or the characters that 
correspond to the other symbolic parameter. 
This process is called concatenation • 

The macro definition, macro instruction, 
and generated statements in the following 
example illustrate these rules. 



form part of the operand field of the third 
generated statement • 



If the programmer wants to concatenate a 
symbolic parameter with a letter, digit, 
left parenthesis, or period following the 
symbolic parameter, he must immediately 
follow the symbolic parameter with a 
period, A period is optional if the sym- 
bolic parameter is to be concatenated with 
another symbolic parameter, or with a spe- 
cial character other than a left parenthe- 
sis or another period that follows it. 



If a symbolic parameter is immediately 
followed by a period, the symbolic paramet- 
er and the period are replaced by the 
characters that correspond to the symbolic 
parameter. A period that immediately fol- 
lows a symbolic parameter does not appear 
in the generated statement. 



r T T . 1 

(Name (Operation [Operand j 



Header 




Prototype 


£NAME| 


Model 


£NAME| 


Model | 




Model | 




Model | 




Trai ler 




Macro 


HERE | 


Generated 


HERE | 


Generated 




Generated 




Generated 





MACRO 

MOVE 

STfcTY 

LSTY 

ST4TY 

LfcTY 

MEND 

MOVE 

STD 
LD 
STD 
LD 



I 

|£TY,£P,£TO,£FROM 
| 2 , SAVEAREA 

| 2, fc Pi FROM 

|2,£P£TO 

| 2, SAVEAREA 



! 



|D,FIELD,A,B 

I 

| 2, SAVEAREA 
| 2, FIELDS 
|2,FIELDA 
| 2, SAVEAREA 

-X . 



Symbolic parameter £TY is used in each 
of the four model statements to vary the 
mnemonic operation code of each of the 
generated statements. The character D in 
the macro instruction corresponds to sym- 
bolic parameter £TY. Since £TY is preceded 
by other characters (that is, ST and L) in 
the model statements, the character that 
corresponds to STY (that is, D) is conca- 
tenated with the other characters to form 
the operation fields of the generated 
statements . 

Symbolic parameters 4P, £TO, and £FROM 
are used in two of the model statements to 
vary part of the operand fields of the 
corresponding generated statements. The 
characters FIELD, A, and B correspond to 
the symbolic parameters £P, £TO, and £FROM. 
Since £P is followed by SFROM in the second 
model statement, the characters that corre- 
spond to them (that is, FIELD and B) are 
concatenated to form part of the operand 
field of the second generated statement. 
Similarly, FIELD and A are concatenated to 



The following macro definition, macro 
instruction, and generated statements il- 
lustrate these rules. 



Header | 

Prototype jfcNAME 

Model I &NAME 

Model 

Model j 

Model 

Trailer 

Macro 

Generated | HERE 
Generated! 
Generated | 
Generated | 

L 







£P,£S,£Rl,£R2 
£R1,£S. (£R2) 
£R1,£P.B 
£R1,£P.A 
£R1,£S. (£R2> 



FIELD, SAVE, 2, 4 

2,SAVE(<*> 
2,FIELDB 
2,FIELDA 
2,SAVE(4) 



The symbolic parameter £P is used in the 
second and third model statements to vary 
part of the operand field of each of the 
corresponding generated statements . FIELD 
cf the macro instruction corresponds to £P. 
Since £P is to be concatenated with letters 
(B and A) in each of the statements, a 
period immediately follows £P in each of 
the model statements. The period does not 
appear in the generated statements. 

Similarly, symbolic parameter £S is used 
in the first and fourth model statements to 
vary the operand fields of the correspond- 
ing generated statements. £S is followed 
by a period in each of the model statements 
because it is to be concatenated with a 
left parenthesis. The period does not 
appear in the generated statements. 
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com ment s Statements 

A model statement may be a comments 
statement. A comments statement consists 
of an asterisk in the begin column, fol- 
lowed by comments . The comments statement 
is used by the assembler to generate an as- 
sembler language comments statement, just 
.is other model statements are used by the 
assembler to generate assembler language 
statements. No variable symbol substitu- 
te ion is performed. 

The programmer may also write, in a 
macro definition, comments statements that 
are not to be generated* These statements 
must have a period in the begin column, 
immediately followed by an asterisk and the 
comments. 

The first statement in the following 
example will be used by the assembler to 
generate a comments statement; the second 
statement will not. 



ditional assembly instructions into a macro 
definition, just as COPY may be used out- 
side macro definitions to copy source 
statements into an assembler language 
program. 

The format of this statement is: 



r T . — T . . , 

(Name (Operation (Operand ( 

l + 4 , H 

| Blank j COPY |A symbol j 



The symbol in the operand field identi- 
fies the section of coding to be copied* 
Any statement that may be used in a macro 
definition may be part of the copied cod- 
ing, except MACRO, MEND, COPY, and proto- 
type statements* 



r „ T T .. 1 

| Name | Operation (Operand | 

L_„„i_ x _ i 

| *TH1S STATEMENT WILL BE GENERATED j 
(.♦THIS ONE WILL NOT BE GENERATED | 

l . ; i 



COPY STATEMENTS 

COPY statements may be used to copy 
model statements and MEXIT, MNOTE, and con- 



Statements to be copied are secured ei- 
ther from a supplementary macro library or 
the system macro library. If available, 
the supplementary macro library is first 
searched for the statements to be copied. 
If the statements are not in the supplemen- 
tary macro library, the system macro 
library is then searched. 

A COPY statement is not a model state- 
ment, since it is not used by the assembler 
to generate a COPY statement. 
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SECTION 8; 



HOW TO WRITE MACRO INSTRUCTIONS 



The format of a macro instruction is: 



• A t i B i c i D n • 



r T T . 1 

(Name (Operation (Operand J 

j. + + f 

(Symbol (Mnemonic (0 or more operands , | 
(or blank j operation j separated by commas | 
( (code | | 

l . X A . . — J 

The name field of the macro instruction 
may contain a symbol. The symbol will not 
be defined unless a symbolic parameter 
appears in the name field of the prototype 
and the same parameter appears in the name 
field of a generated model statement. 

The operation field contains the mnemon- 
ic operation code of the macro instruction. 
The mnemonic must be the same as the mne- 
monic of a macro definition in the source 
program or in the macro library. The macro 
definition with the same mnemonic is used 
by the assembler to process the macro 
instruction. If a macro definition in the 
source program and one in the macro library 
have the same mnemonic, the macro defini- 
tion in the source program is used. 

The placement and order of the operands 
in the macro instruction are determined by 
the placement and order of the symbolic 
parameters in the operand field of the pro- 
totype statement. 



An apostrophe immediately followed ty a 
letter and immediately preceded by the 
letter L, which in turn is preceded by any 
special character other than fc, and not 
within a quoted string, is not considered 
to be the first apostrophe of a quoted str- 
ing. An example is (L f X). 



Paired Parentheses ; There must be an equal 
number of left and right parentheses; 
paired parentheses are a left parenthesis 
and a following right parenthesis, without 
any intervening parentheses. If there is 
more than one pair, each additional pair is 
determined by removing any pairs already 
recognized and reapplying the above rule 
for paired parentheses. For instance, in 
the following example the first and fourth, 
the second and third, and the fifth and 
sixth parentheses are paired parentheses: 
(A(B)OD(E) 

A parenthesis that appears between 
paired apostrophes is not considered in 
determining paired parentheses. For 
instance, the middle parenthesis is not 
considered in this example: (•>•) 

Equal Signs : An equal sign can occur only 
as the first character in an operand or 
between paired apostrophes or paired paren- 
theses. These illustrate the rule: 



MACRO INSTRUCTION OPERANDS 

Any combination of up to 255 characters 
may be used as a macro instruction operand, 
provided the following rules concerning 
apostrophes, parentheses, equal signs, 
ampersands, commas, and blanks are 
observed. 

Paired Apostrophes : An operand may contain 
one or more quoted strings, or sequences of 
characters that begin and end with apos- 
trophes and contain even numbers of 
apostrophes. 

The first quoted string starts with the 
first apostrophe in the operand. Subse- 
quent quoted strings start with the first 
apostrophe after the apostrophe that ends 
the previous quoted string. 

The first and last apostrophes of a 
quoted string are called paired apos- 
trophes. In the following example, the 
first and fourth and the fifth and eighth 
apostrophes are paired apostrophes. 



=F , 32 i 

ECF=G) 

Ampersands : Each sequence of consecutive 
ampersands must be an even number of amper- 
sands, except as noted under " Inner Macro 
Instructions," below. This example illus- 
trates the rule: 

££123&t&£ 

Commas : A comma indicates the end of an 
operand, unless it is r laced between paired 
apostrophes or paired parentheses- This 
example illustrates the rule: 

(A,B)C f , • 

Blanks : A blank indicates the end of the 
operand field, unless it is placed between 
paired apostrophes, except as noted under 
"Statement Format," below. This example 
illustrates the rule: 

•A E C 
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These are valid macro instruction 
operands ; 



SYMBOL 




A + 2 


1 2\ 




(TO (8) , FROM) 


X' 189A § 




0!2 f 3) 


♦ 




=F , i*096 i 


L f NAME 




A3&&9 


■TEN = 


10' 


•PARENTHESIS IS) • 


•quote 


IS ,fi 


'COMMA IS,* 



These are invalid macro instruction 
operands: 



W ■ NAME 
5A)B 

(15 B> 

'ONE' IS 'I' 

STATEMENT FORMAT 



(odd number of 
apostrophes) 

(number of left paren- 
theses does not equal num- 
ber of right parentheses) 

(blank not placed between 
apostrophes) 

(blank not placed between 
paired apostrophes) 



Macro instructions may use the same 
alternate format that can be used for pro- 
totype statements. If the alternate format 
is used, a blank does not always indicate 
the end of the operand field. The altern- 
ate format was described in Section 7 under 
"Macro Instruction Prototype." 



OMITTED OPERANDS 

If an operand that appears in the proto- 
type statement is omitted from the macro 
instruction, the comma that would have 
separated it from the next operand must be 
present. If the last operand is omitted 
from a macro instruction, the comma 
separating the last operand from the pre- 
vious operand may be omitted. 

The following example shows a macro 
instruction preceded by its corresponding 
prototype statement? the operands that 
correspond to the third and sixth operands 
of the prototype statement are omitted. 

j T T _ . , . 1 

| Name | Operation) Operand | 

> f + „ 4 

I (EXAMPLE | 6A, §B # &C e £B, fcE, fcF j 

| (EXAMPLE |17 v *+«,,ARgA ff FIELD(6> | 

l _JL . _ X„ ._„ . . . J 



If the symbolic parameter that corres- 
ponds to an omitted operand is used in a 
model statement, a null character value 
replaces the symbolic parameter in the 
generated statement. In effect, the sym- 
bolic parameter is removed. 



For example, the first statement below 
is a model statement that contains the sym- 
bolic parameter fcC. If the operand that 
corresponds to £C were omitted from the 
macro instruction, the second statement 
would be generated from the model 
statement. 



r t • — t ■ T 

1 Name | Operation | Operand | 

l — _ + + 4 

j |MVC JTHERE£C.25,THIS j 

j JMVC |THERE25,THIS j 

i x . x : . j 



OPERAND SUBLISTS 

An operand of a macro instruction may be 
a sublist that provides the programmer with 
a convenient way to refer to: (a) a 
collection of macro instruction operands as 
a single operand, or (b) a single operand 
in a collection of operands. 

A sublist consists of one or more 
operands separated by commas and enclosed 
in paired parentheses. The entire sublist, 
including the parentheses, is considered to 
be one macro instruction operand. 

If a macro instruction is written in the 
alternate statement format, each sublist 
operand may be written on a separate line; 
the macro instruction may be written on as 
many lines as there are operands, including 
sublist operands. 

If 4P1 is a symbolic parameter in a pro- 
totype statement, and the corresponding 
operand of a macro instruction is a sub- 
list, fcPl(n) may be used in a. model state- 
ment to refer to the nth operand of the 
sublist, where n may be a decimal integer, 
(n may also be any arithmetic expression 
allowed in the SETA instruction that is 
described in Section 9.) 

If SP1 is a symbolic parameter in a pro- 
totype statement, and the corresponding 
operand of a macro instruction is not a 
sublist, SPl(n) refers to the operand as a 
whole, regardless of the value of n. 

For example, consider these macro 
definition, macro instruction, and 
generated statements: 
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r 




"T » 


T ^ 


(Name 


| Opera t. 


Lon| Operand ( 


h 




_J._ 


i. j 


T ----- 


1 — 1 


Header | 




| MACRO 




Prototype) 




(TOTAL 


|SNUM,fcREG, SAREA | 


Model | 




|L 


|4REG,*NUM(1) ( 


Model J 




|A 


|4REG,4NUM(2) | 


Model | 




IA 




Model 1 




|ST 


|4REG,&AREA | 


Trailer | 




(MEND 
i 




Macro | 




I 
(TOTAL 

1 


| (A,B,C),6,SUM | 


< .t'neidted j 




I 
|L 


|6,A | 


(ionerated| 




(A 


|6 f B | 


Generated | 




|A 


16.C | 


(irnera ted| 




(ST 


|6,SUM | 


t. 




~L 


X . _, J 



The operand of the macro instruction 
that corresponds to symbolic parameter SNUM 
is a sublist. One of the operands in the 
sublist is referred to in the operand field 
of three model statements. For example, 
fcNUM(l> refers to the first operand in the 
sublist corresponding to symbolic parameter 
&NUM; the first operand is A, Therefore, A 
replaces fcNUM(l) to form part of the 
generated statement. 



Note : When referring to an operand in a 
sublist, the left parenthesis of the sub- 
list notation must immediately follow the 
last character, fcNUM(l), of the symbolic 

parameter. 

A period should not be placed between 
the left parenthesis and the last character 
of the symbolic parameter, A period may be 
used between these two characters only when 
the programmer wants to concatenate the 
left parenthesis with the characters that 
the symbolic parameter represents. The 
tollowing example shows what would be 
yenerated if a period appeared between the 
left parenthesis and the last character of 
the symbolic parameter in the first model 
statement of the preceding example. 



r T T . T 

(Name (Operation (Operand | 



Prototype 
Model 

Macro 

Generated 



(TOTAL |£NUM,£ REG,* AREA 

|L |£REG,£NUM. (1) 

1 I 

(TOTAL j (A,B,C) f 6 f SDM 

1 I 

|L 16,CA,B f C> CI) 

-J. . .- X 



The symbolic parameter 4NUM is used in 
the operand field of the model statement. 
The characters (A,B,C) of the macro 
instruction correspond to SNUM. Since 6NUM 
is immediately followed by a period, SNUM 
and the period are replaced by (A ff B,C); the 
period is not in the generated statement. 



The resulting generated statement is an 
invalid assembler language statement. 



INNER MACRO INSTRUCTIONS 

A macro instruction may be used as a 
model statement in a macro definition; then 
the macro instruction is called an inner 
macro instruction. A macro instruction 
that is not used as a model statement is 
called an outer macro instruction. 

Any symbolic parameters used in an inner 
iracro instruction are replaced by the 
corresponding characters of the outer macro 
instruction. The macro definition corres- 
ponding to an inner macro instruction is 
used to generate the statements that 
replace the inner macro instruction. 

The TOTAL macro instruction of the pre- 
vious example is used as an inner macro 
instruction in the following example. The 
inner macro instruction contains two sym- 
bolic parameters, fcS and §T. Characters 
(X,Y,Z) and J of the macro instruction 
correspond %o fcS and ST. Therefore, these 
characters replace the symbolic parameters 
in the operand field of the inner macro 
instruction. 



r T - T -^ 

| Name | Operation | Operand | 



Header | 
Prototype j 

Model j 

Model | 

Model I 

Inner | 

Model | *U 

Trailer | 

I 
Macro IK 



(MACRO 
| COMP 
|SR 

|C 

|BNE 
| TOTAL 
(A 
(MEND 

I 
ICOMP 



Generated) |SR 

Generated} |C 

Generated! |BNE 

Generated) jL 

Generated! (A 

Generated) |A 

Generated} |ST 

Generated j K (A 

L X - 



*Rl,*R2.*S,ST,fcU 

*R1,6R2 

tRl f €T 

tu 

4S,12, ST 
SRI, ST 



10,11,(X,Y,Z>,J,K 

10,11 
10, J 
K 
12, X 

12, y 

12, Z 
12, J 

10, J 



The assembler then uses the macro 
definition that corresponds to the inner 
iracro instruction to generate statements to 
replace the inner iracro instruction. The 
fourth through seventh statements are 
generated for the inner macro instruction. 

Note : An ampersand that is part of a sym- 
bolic parameter is not considered in deter- 
mining whether a macro instruction operand 
contains an even number of consecutive 
ampersands. 
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LEVELS OF MACRO INSTRUCTIONS 

A macro definition that corresponds to 
an outer macro instruction may contain any 
number of inner macro instructions. The 
outer macro instruction is considered a 
first- level macro instruction. Each inner 
macro instruction is considered a second- 
level macro instruction. 

The macro definition that corresponds to 
a second- level macro instruction may con- 
tain any number of inner macro instructions. 
These are considered third-level macro 
instructions, etc. 
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SECTION 9: HOW TO WRITE CONDITIONAL ASSEMBLY INSTRUCTIONS 



The conditional assembly instructions 
allow the programmer to: (a) define and 
assign values to SET symbols that can be 
used to vary parts of generated statements, 
and (b) vary the sequence of generated 
statements. Thus the programmer can use 
these instructions to generate many dif- 
ferent sequences of statements from the 
same macro definition. 

Nine of the 12 conditional assembly 
instructions are described in this section: 

LCLA SETA AIF 
LCLB SETB AGO 
LCLC SETC ANOP 

The other three, GBLA, GBLB, and GBLC, 
are described in Section 10. 

All conditional assembly instructions 
may be used anywhere in an assembler lan- 
guage source program; the primary use is in 
macro definitions. 

The LCLA, LCLB, and LCLC instructions 
may be used to define and assign initial 
values to SET symbols. 

The SETA f SETB, and SETC instructions 
may be used to assign arithmetic, binary, 
and character values, respectively, to SET 
symbols. The SETB instruction is described 
below, after the SETA and SETC instruc- 
tions, because the operand field of the 
SETB instruction is a combination of the 
operand fields of the SETA and SETC 
instructions . 

The AIF, AGO, and ANOP instructions may 
be used in conjunction with sequence sym- 
bols to vary the sequence in which state- 
ments are processed by the assembler. The 
programmer can test attributes assigned by 
the assembler to macro instruction operands 
to determine which statements are to be 
processed. 

Examples illustrating the use of each 
conditional assembly instruction are 
included throughout this section, and a 
chart summarizing the elements that can be 
used in each instruction appears at the end 
of this section. 



SET SYMBOLS 

SET symbols are one type of variable 
symbol; symbolic parameters, in Section 7, 
are another type. SET symbols differ from 
symbolic parameters in: (a) where they can 



be used in an assembler language source 
program, (b) how they are assigned values, 
and (c) whether the values assigned to them 
can be changed. 

Symbolic parameters can only be used in 
macro definitions; SET symbols can be used 
inside and outside macro definitions. 

Symbolic parameters are assigned values 
when the programmer writes a macro instruc- 
tion i SET symbols are assigned values when 
he writes SETA, SETB, and SETC conditional 
assembly instructions. 

Each symbolic parameter is assigned a 
single value for one use of a macro defini- 
tion, whereas the values assigned to each 
SETA, SETB, and SETC symbol can change dur- 
ing one use of a macro definition. 



Defining SET Symbols 

SET symbols must be defined by the pro- 
grammer before they are used. When a SET 
symbol is defined, it is assigned an ini- 
tial value. New values may be assigned by 
the SETA, SETB, and SETC instructions. A 
SET symbol is defined when it appears in 
the operand field of an LCLA, LCLB, or LCLC 
instruction. 



Using Variable Symbols 

SETA, SETB, and SETC instructions may be 
used to change the values assigned to SETA, 
SETB, and SETC symbols. When a SET symbol 
appears in the name, operation, or operand 
field of a statement, the current value of 
the SET symbol replaces the SET symbol in 
the statement. 

For example, if %h is a symbolic para- 
meter and the corresponding characters of 
the macro instruction are the symbol HERE, 
then HERE replaces each occurrence of £A in 
the macro definition. However, if $A is a 
SET symbol, the value assigned to tA can be 
changed, and a different value can replace 
each occurrence of £A in the macro defini- 
tion. The same variable symbol may not be 
used as a symbolic parameter and as a SET 
symbol in the same macro definition. The 
rule is illustrated by: 

r T . T — . 1 

| Name (Operation (Operand | 

k + - + 1 

| SNAME j MOVE | €TO , SFROM ( 

t A . ._A_- . j 
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If the statement above is a prototype 
statement, 4NAME, fcTO, and fcFROM may not be 
used as SET symbols in the macro 
definition. 

The same variable symbol may not be used 
as two different types of SET symbols in 
the same macro definition. Similarly, the 
same variable symbol may not be used as two 
different types of SET symbols outside 
macro definitions. For example, if £A is a 
SETA symbol in a macro definition, it can- 
not be used as a SETC symbol in that 
definition. Similarly, if &A is a SETA 
symbol outside macro definitions, it cannot 
be used as a SETC symbol outside macro 
definitions. 

The same variable symbol may be used in 
two or more macro definitions and outside 
macro definitions. In that case, the vari- 
able symbol will be considered a different 
variable symbol each time it is used. For 
example, if £A is a variable symbol (either 
SET symbol or symbolic parameter) in one 
macro definition, it can be used as a vari- 
able symbol in another definition. Simi- 
larly, if £A is a variable symbol in a 
macro definition, it can be used as a SET 
symbol outside macro definitions. 

All variable symbols may be concatenated 
with other characters in the same way that 
symbolic parameters may be concatenated 
with other characters. The rules for this 
concatenation are in Section 7, under 
•Model Statements.* 

Variable symbols in macro instructions 
are replaced by the values assigned to 
them, immediately prior to processing the 
definition. If a SET symbol is used in the 
operand field of a macro instruction, and 
the value assigned to the SET symbol is e- 
quivalent to the sublist notation, the 
operand is not considered a sublist. 



previously defined. The notations asso- 
ciated with the attributes are: 



Type 


T « 


Length 


I" 


Scaling 


S' 


Integer 


I 1 


Count 


K' 


Number 


N' 



This is how the programmer may refer to 
an attribute: 

1. In a statement that is outside macro 
definitions, he may write the notation 
for the attribute, immediately fol- 
lowed by a symbol; for example, L f NAME 
refers to the length attribute of the 
symbol NAME. 

2. In a statement that is in a macro 
definition, he may write the notation 
for the attribute, immediately fol- 
lowed by a symbolic parameter! e.g., 
L" SNAME refers to the length attribute 
of the macro instruction operand that 
corresponds to symbolic parameter 
SNAMEf I/CNAME(2> refers to the length 
attribute of the second operand in the 
sublist that corresponds to symbolic 
parameter SNAME. 

If a macro instruction operand is a 
sublist, the programmer may refer to 
any of the attributes of each member 
in the list. However, the only attri- 
butes defined for the entire sublist 
are number and count, and any 
reference to type, length, scaling or 
integer attributes of an entire sub- 
list parameter is invalid. For 
example, L f *NAME(2), referring to the 
length attribute of the second member 
of a symbolic parameter which is a 
sublist, would be valid? L^NAME, ref- 
erring to the sublist itself, would 
not be valid. 



ATTRIBUTES 

The assembler assigns attributes to 
macro instruction operands, all literals, 
and all symbols defined in the program. 
The six attributes, type, length, scaling, 
integer, count, and number, are discussed 
below. 

All attributes of macro instruction 
operands may be referred to within macro 
definitions. However, only the type, 
length, scaling, and integer attributes of 
symbols may be referred to outside macro 
definitions. Attributes of syirbols appear- 
ing in the name field of generated state- 
ments may not be referred to outside macro 
definitions? they may be referred to within 
macro definitions only when the symbol is 



If an outer macro instruction operand is 
a symbol or a literal, the operand attri- 
butes are the same as the corresponding 
attributes of the symbol or literal. The 
symbol must appear in the name field of an 
assembler language statement or in the 
operand field of an EXTBN statement. The 
statement must be outside macro definitions 
and must not contain any variable symbols. 
If an inner macro instruction operand is a 
symbolic parameter, the operand attributes 
are the same as the attributes of the 
corresponding outer macro instruction 
operand. 

Type Attribute (T* ) 

The type attribute of a macro instruc- 
tion operand, a literal, or a symbol is a 
letter. This list defines the letters that 
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are used for symbols that name DC and DS 
steitements , and for outer macro instruction 
operands that are either literals or sym- 
bols that name DC or DS statements: 

A A-type address constant, implied 
length, aligned 

B Binary constant 

C Character constant 

D Long floating-point constant, 
implied length, aligned 

E Short floating-point constant, 
implied length, aligned 

F Full word fixed-point constant, 
implied length, aligned 

G Fixed-point constant, explicit 
length 

H Half word fixed-point constant, 
implied length, aligned 

K Floating-point constant, explicit 
length 

P Packed decimal constant 

q Q~type address constant, implied 
length, aligned 

R A~, Q-, R-, S-, V-, or Y-type 

address constant, explicit length 

C S-type address constant, implied 
length, aligned 

V V-type address constant, implied 
length, aligned 

X Hexadecimal constant 

Y Y-type address constant, implied 
length, aligned 

Z Zoned decimal constant 

# R-type address constant, implied 
length, aligned 

These letters are used for symbols and 
outer macro instruction operands that are 
symbols which: (a) name statements other 
than DC or DS statements, or (b) appear in 
the operand field of an EXTRN statement: 

I Machine instruction 

J Control section name 

M Macro instruction 

T External symbol 

w ccw assembler instruction 

These letters are used only for inner 
and outer macro instruction operands: 



N Self-defining term 
O Omitted operand 

U = Undefined is used fori (a) symbols 
whose attributes are not available, and (b) 
inner and outer macro instruction operands, 
symbols, or literals that cannot be 
assigned any of the above letters. The U 
is also assigned to symbols that name EQU 
statements. 

The programmer may refer to a type 
attribute in the operand field of a SETC 
instruction, or in character relations in 
the operand fields of SETB or AIF 
instructions . 



length (1/) Scaling (S«), and Integer (I*) 
Attributes 

These attributes of macro instruction 
operands, literals, and symbols are numeric 
values. 

The length attribute of a symbol (or of 
a macro instruction operand that is a sym- 
bol) was described in Section 2. The 
length attribute of symbols or macro 
instruction operands with attributes of M, 
0, T, or U is 0. If N is the type attri- 
bute, the length attribute is 1. 

Scaling and integer attributes are pro- 
vided for fixed- point, floating-point, and 
decimal literals, and for symbols that name 
fixed-point, floating-point and decimal 
fields. 

Fixed-Point s The scaling attribute of a 
fixed-point number is the value of the 
scale modifier subfield of the DC state- 
ment. The integer attribute of a fixed- 
point number is a function of the length 
and scaling attributes, as I i =8*L , -S"-l. 

Floating-Point : The scaling attribute of a 
floating-point number is the number of hex- 
adecimal Os in the leftmost portion of the 
fraction. The integer attribute of a 
floating-point number is the number of sig- 
nificant hexadecimal digits in the 
fraction. 

Decimal : The scaling attribute of a decim- 
al number is the number of decimal digits 
to the right of the decimal point. The 
integer attribute of a decimal number is a 
function of the length and scaling attri- 
butes. For a packed decimal number, I*=2* 
L , -S , -l? for a zoned decimal number. 

Scaling and integer attributes are 
available for symbols and macro instruction 
operands only if their type attributes are 
H, F, and G (fixed- point),; D, E, and K 
(floating-point) ; or P and Z (decimal) . 
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The programmer may refer to the length, 
scaling, and integer attributes in the 
operand field of a SETA instruction, or in 
arithmetic relations in the operand fields 
of SETB or AIF instructions. 



Fixed-Point : The integer attribute of a 
fixed-point number is equal to eight times 
the length attribute of the number, minus 
the scaling attribute, minus 1; that is, 
I«=8*L - -S'-1. 



coun t Attribute (KM 

The count attribute is a value equal to 
the number of characters in the macro 
instruction operand, excluding commas. If 
the operand is a sublist, the count attri- 
bute includes the beginning and ending 
parentheses and the commas within the sub- 
list. The count attribute of an omitted 
operand is 0. This attribute is assigned 
to macro instruction operands only. . 

It the macro instruction operand con- 
tains variable symbols, the characters that 
replace the variable symbols, rather than 
the variable symbols themselves, are used 
to determine the count attribute. 

The programmer may refer to the count 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc- 
tions that are parts of a macro definition. 



Nu mber Attribute (N w ) 

The programmer may refer to the number 
attribute of macro instruction operands 
on 1 y . 

The number attribute is a value equal to 
the number of operands in an operand sub- 
list. The number of operands in an operand 
sublist is equal to 1 plus the number of 
commas that indicate the end of an operand 
in the sublist. 

These examples illustrate the rule: 



(A,B,C,D,E) 
(A, f C, D,E) 
(A # B,C,D) 
(,B f C,D,E> 
(A f B f C,D, ) 
<A f B,C # D, , ) 



operands 
operands 
operands 
operands 
operands 
operands 



If the macro instruction operand is not 
a sublist, the number attribute is 1; if 
the operand is omitted, it is 0. 

The programmer may refer to the number 
attribute in the operand field of a SETA 
instruction, or in arithmetic relations in 
the operand fields of SETB and AIF instruc- 
tions that are part of a macro definition. 

Assigning Attributes to Symbols 

The integer attribute is computed from 
the length and scaling attributes. 



Each of the following statements defines 
a fixed-point field. The length attribute 
of HALFCON is 2, the scaling attribute is 
6, and the integer attribute is 9. The 
length attribute of ONECON is **, the scal- 
ing attribute is 8, and the integer attri- 
bute is 23. 



(Name (Operation J Operand [ 

(HALFCON (DC |HS6 , -25.93 < ( 

(ONECON (DC |FS8 , 100.3E-2* | 

i L X ._. _J 



Floating-Point ; This integer attribute is 
equal to two times the difference between 
the length attribute of the number and 1, 
minus the scaling attribute; that is, 
I , =2*(L , -l>~S i . 



Each of the following statements defines 
a floating-point field. The length attri- 
bute of SHORT is 4, the scaling attribute 
is 2, and the integer attribute is 4. The 
length attribute of LONG is 8, the scaling 
attribute is 5, and the integer attribute 
is 9. 



r — 1 . — . T . s 

(Name (Operation (Operand | 

L + __ + _ „ i 

(SHORTJDC |ES2 f **6.<*15 , | 

(LONG (DC (DS5 , -3.729 f | 

t. X ... i 1 



Decimal ; The integer attribute of a packed 
decimal number is equal to two times the 
length attribute of the number, minus the 
scaling attribute, minus \% that is, I , = 2* 
L'-S'-l. The integer attribute of a zoned 
decimal number is equal to the difference 
between the length attribute and the scal- 
ing attribute? that is, I'^L^S*. 



This table identifies the characteris- 
tics of the names that are in the state- 
ments defining the decimal fields: 



Name 

FIRST 

SECOND 

THIRD 

FOURTH 



length 
2 
3 
H 
3 



Scaling 
2 

2 
2 



Integer 
1 
3 
2 
3 
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r — T T 1 

I Name | Operation (Operand | 

k + + „ i 

|FIRST |DC JP'+I^S' j 

| SECOND | DC jZ'-S^a 1 | 

(THIRD | DC |Z V 79.68« | 

|FOURTH|DC |P , 79.68 i | 

L JL _ JL . . 1 



SE QUENCE SYMBOLS 

Name fields may contain sequence symbols 
that provide the programmer with the abili- 
ty to vary the sequence in which statements 
are processed by the assembler. 

A sequence symbol is used in the operand 
tield of an AIF or AGO statement to refer 
to the statement named by the sequence sym- 
bol, A sequence symbol may be used in the 
name field of any statement that does not 
contain a symbol or SET symbol; exceptions 
are prototype statements and MACRO, LCLA, 
LCLB f LCLC, GBLA, GBLB, and GBLC 
instructions. 

A sequence symbol consists of a period 
followed by one through seven letters and/ 
or digits; a letter must be first. 

These are valid sequence symbols: 



• READER 


.A23<*56 


. LOOP2 


• xaF2 


.N 


• S<4 



This example illustrates the rules 



r T T _ — 

| Name | Operation | Operand 



r- 



| MACRO 
(NAME | MOVE 
(NAME j ST 

| ST 

|L 

| MEND 

I 
.SYM | MOVE 

I 
|ST 

|L 

|ST 



j$TO,«FROM 

|2,SAVEAREA 

|2,iFROM 

|2,ST0 

|2,SAVEAREA 

I 

I 

|FIELDA,FIELDB 

I 

|2 f SAVEAREA 
|2 r FIELDB 
|2,FIELDA 
|2,SAVEAREA 
-A- 



The symbolic parameter 4 NAME is used in 
the name field of the prototype statement 
(1) and the first model statement (2). In 
the macro instruction (3) a sequence symbol 
(.SYM) corresponds to the symbolic paramet- 
er (NAME that is not replaced by .SYM; 
therefore r the generated statement ((») does 
not contain an entry in the same field. 

Sequence symbols appearing within a 
iracro definition are, in effect, "local" 
symbols that may be duplicated in ether 
iracro definitions. 



LCLA, LCLB. LCLC — Define SET Symbols 
The format of these instructions is: 



These are invalid sequence symbols: 

CAFDAJREA (first character is not 
period) 

. 246B (first character after period 
is not letter) 

.AREA2345 (more than seven characters 
after period) 

. BCD%84 (contains special character 
other than initial period) 

.IN AREA (contains special character 
(blank) other than initial 
period) 

If a sequence symbol appears in the name 
field of a macro instruction, and the 
corresponding prototype statement contains 
a symbolic parameter in the name field, the 
sequence symbol does not replace the sym- 
bolic parameter wherever it is used in the 
macro definition. 



(Name j Operation (Operand j 

j Blank j LCLA, jOne or more variable j 

| JLCLB, [symbols to be used as j 

j | or LCLC | SET symbols, separated | 

| j j by commas j 

i x — . x : . . j 



The LCLA, LCLB, and LCLC instructions 
are used to define and assign initial 
values to SETA, SETB, and SETC symbols. 
SETA, SETB, and SETC are assigned initial 
values of 0, 0, and null character value, 
respectively. 

The programmer should not define any SET 
symbol whose first four characters are 
€SYS. 

An LCLA, LCLB, or LCLC instruction that 
is part of a macro definition must occur 
before any of the symbols which it defines 
are referenced by SET statements. 
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SETA — SET Arithmetic 



Evaluation of Arithmetic Expressions 



This instruction may be used to assign 
an arithmetic value to a SETA symbol. The 
format of this instruction is: 

r T T . . ^ 

| Name I Operation (Operand [ 

t + _ + i 

| seta (SETA (Arithmetic expression | 
| symbol j ( | 

i L X 1 



The procedure used to evaluate the 
arithmetic expression in the operand field 
of a SETA instruction is the same as that 
used to evaluate arithmetic expressions in 
assembler language statements. The only 
difference between the two types of arith- 
metic expressions is the terms that are 
allowed in each expression. This is the 
evaluation procedure: 



The expression in the operand field is 
evaluated as a signed 32-bit arithmetic 
value which is assigned to the SETA symbol 
in the name field. The minimum and maximum 
allowable values of the expression are -2 3A 
and *2 3 *-l. 

The expression may consist of one term 
or an arithmetic combination of terms. 
Terms that may be used alone or in combin- 
ation are self-defining terms, variable 
symbols, and the length, scaling, integer, 
count, and number attributes. 

A variable symbol may not represent a 
relocatable symbol (even if paired to form 
an absolute expression) when used in the 
operand of a SETA instruction. 



Note: A SETC variable symbol may appear in 
a SETA expression only if the value of the 
SETC variable is from one to eight decimal 
digits; decimal digits will be converted to 
a positive arithmetic value. 

The arithmetic operators that may be 
used to combine the terms of an expression 
are ♦ (add), - (subtract), * (multiply), 
and / (divide) . An expression may not con- 
tain two terms or two operators in succes- 
sion, nor may it begin with an operator. 

These are valid operand fields of SETA 
instructions: 



fcABEA+X^D* 
fcBETA*10 
L f SHERE+32 



I*£N/25 

fcEXIT-SUENTRY+1 

29 



1. Each term is given its numerical 
value. 



The arithmetic operations are per- 
formed from left to right; multiplica- 
tion and division are performed before 
addition and subtraction. 



The computed result is the value 
assigned to the SETA symbol in the 
name field. 



The arithmetic expression in the operand 
field of a SETA instruction may contain one 
or more sequences of arithmetically combi- 
ned terms that are enclosed in parentheses. 
A sequence of parenthesized terms may 
appear within another parenthesized 
sequence. These examples of SETA instruc- 
tion operand fields contain parenthesized 
sequences of terms: 



(L f £HERE*32)*29 

SAREA^X^DVUEXIT-SUEOTRY+l) 

&EETA*10*(I"€N/25/(fcEXlT-S , SENTRY4.1)) 



The parenthesized portions of an arith- 
metic expression are evaluated before the 
other terms. Parenthesized terms that are 
within other parenthesized sequences are 
evaluated first. 



These are invalid operand fields of SETA 
instructions : 

fcAREAX'C' (two terms in succession) 

4FIELD+- (two operators in 
succession) 

-4 DELTA* 2 (begins with operator) 

♦♦3 2 (begins with operator; two 

operators in succession) 

NAME/15 (NAME is not valid term) 



Using SETA Symbols 

The arithmetic value assigned to a SETA 
symbol is substituted for the SETA symbol 
when it is used in the operand field of a 
SETA instruction, or in arithmetic rela- 
tions in the operand fields of SETB and AIF 
instructions. If SETA is used in any other 
statement, the arithmetic value is con- 
verted to an unsigned integer, with leading 
f s removed; when the value is 0, it is 
converted to a single 0. 
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This illustrates the rule: 



r T T 

| Name | Operation | Operand 



1 

2 
i 

5 

6 



(NAME | 

*A 

|(B 
iC 

l&o 

iNAMEl 



MACRO j 




MOVE 


6TO,4FROM 


LCLA 


*A, £B,*C,SD 


SETA 


10 


SETA 


12 


SETA 


*A-*B 


SETA 


SA*fcC 


ST 


2, SAVEAREA 


L 


2 f fcFROMfcC 


ST 


2,STOSD 


L 


2, SAVEAREA 


MEND 





I HERE [MOVE 



[HERE 



|ST 
|L 

|ST 

L 



|FIELDA f FIELDB 

| 2 , SAVEAREA 
|2 f FIELDB2 
|2 f FIELDA8 
| 2 f SAVEAREA 



Statements 1 and 2 assign values +10 and 
♦12 to SETA symbols SA and CB. Statement 3 
assigns value -2 to SETA symbol fcC When 
fcC is used in statement 5, value -2 is con- 
verted to unsigned integer 2. When 4C is 
uoed in statement 4, value -2 is used, and 
4D is assigned value *8. When SO is used 
in statement 6, value +8 is converted to 
unsigned integer 8. 

This example shows how the value 
assigned to a SETA symbol in a macro 
definition may be changed: 



r T T _ 

| Name | Operat ion | Operand 
|. + + „. 



fcNAME 

i (A 
fcNAME 

|£A 

| HERE 
I HERE 



| MACRO 
MOVE 
LCLA 
SETA 
ST 
L 

SETA 
ST 
L 
MEND 

[MOVE 

ST 

1ST 
L 



| fcTOSFROM 

|SA 

15 

[2, SAVEAREA 

|2,*FROM4A 

18 

|2,£TO£A 

| 2 , SAVEAREA 

i 

I 

JFIELDA, FIELDS 

I 

| 2, SAVE ARE A 
|2,FIELDB5 
|2,FIELDA8 
I 2, SAVEAREA 
-JL . . 



Statement 1 assigns value +5 to SETA 
symbol £A. In statement 2, SA is converted 
to unsigned integer 5- Statement 3 assigns 
value +8 to feA. In statement 4, therefore, 
&A is converted to unsigned integer B, 
instead of 5. 



A SETA symbol used with a symbolic para- 
meter to refer to an operand in an operand 
sublist must have been assigned a positive 
value. Expressions that may be used in 
operand fields of SETA instructions may be 
used to refer to operands in operand sub- 
lists Idescribed in Section 8, under 
"Operand Sublists"). 

The following macro definition may be 
used to add the last operand in an operand 
sublist to the first operand in an operand 
sublist and store the result at the first 
operand. A sample macro instruction and 
the generated statements follow the macro 
definition. 



r T . T 

| Name | Operation | Operand 



(MACRO 
JADDX 
| LCLA 
iLASTJSETA 
IL 
|A 
[ST 
MEND 



I 

(CNUMBER, SREG 

|*LAST 

|N*6NUMBER 

1*RE CI) 

j SREG,fcNUMBER 

|4REG,*NUMBER 



— 1 

I 



ULAST) 
(1) 



IADDX 



|A 

|ST 



j CA t B f C,D f E) f 3 

! 

|3 f A 
|3,E 
|3 f A 

.X- . 



(NUMBER is the first symbolic parameter 
in the operand field of the prototype 
statement CI). The corresponding charac- 
ters CA,B,C,D,E) of the macro instruction 
(4) are a sublist. Statement 2 assigns to 
SLAST arithmetic value + 5, which is equal 
to the number of operands in the sublist. 
Therefore, in statement 3, ^NUMBER C 6 LAST) 
is replaced by the fifth operand of the 
sublist. 

SETC — SET Character 

SETC assigns a character value to a SETC 
symbol. The format of this instruction is: 



r T — T 

( Name | Operation 1 Operand 
h 



(A SETC I SETC 
(symbol j 



A 

(One operand, of the form| 
j described below j 



The operand field may consist of the 
type attribute, a character expression, a 
substring notation, or a concatenation of 
substring notations and character expres- 
sions. A SETA symbol may appear in the 
operand of a SETC statement. The result is 
the character representation of the decirral 
value, unsigned, with leading 0*s removed; 
if the value is 0, one decimal is used. 
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If a character string containing at 
leant one single apostrophe is to be sub- 
stituted for an operand in a SETC instruc- 
tion, it must meet the requirements 
described in Section 7 t under "Free 
Apostrophes . " 

Type Att ribute 

If the character value assigned to a 
SETC symbol is a type attribute, the attri- 
bute roust appear alone in the operand 
field. The following example assigns to 
4TYPE the type attribute (T 1 ) of the macro 
instruction operand that corresponds to the 
symbolic parameter &ABC. 

r T T . . 1 

| Name | Operat ion | Operand | 

H „„ + _„. + „ 4 

| (TYPE j SETC (T'iABC j 

L X X J 

Character Expression 

A character expression consists of any 
combination of characters enclosed in apos- 
trophes; the enclosed value in the operand 
field is assigned to the SETC symbol in the 
name field. The maximum value size that 
can be assigned to a SETC symbol is eight 
characters. 

Evaluation of Character Expressions : This 
statement assigns the character value AB%4 
to SETC symbol (ALPHA: 



f T — . T 

| Name IOperation| Operand 

j. -„ + x 

j (ALPHA I SETC | " AB%4 f 

t JL JL 



More than one character expression may 
be concatenated into a single expression by 
placing a period between the terminating 
apofjtrophe of one expression and the open- 
ing apostrophe of the next expression. For 
example, either of the following statements 
may be used to assign the character value 
ABCDEF to the SETC symbol (BETA. 

r T T — _ „ . 1 

| Name | Operat ion | Operand | 

l. + „„„„x „ 4 

t (BETA) SETC j' ABCDEF* j 

j £ BETA j SETC j'ABC'.^DEF 1 | 

I X . X „ J 

Two apostrophes must be used to repre- 
sent an apostrophe that is part of a char- 
acter expression, as in this statement: 

r T T . 1 

(Name (Operat ion (Operand j 

|. „x - . + ........ H 

| (LENGTH|SETC | f L s 'SYMBOL* j 

L X . JL . . . J 



Variable symbols may be concatenated 
with other characters in the operand field 
of a SETC instruction, according to the 
general rules for concatenating symbolic 
parameters with other characters (see Sec- 
tion 7) . 

If (ALPHA has been assigned the charac- 
ter value ABX4, the following statement may 
be used to assign the character value 
AB%4RST to the variable symbol (GAMMA. 



r T f . ^ 

(Name | Operation | Operand | 

l.. + — + i 

| (GAMMA j SETC j • (ALPHA. RST f j 

I X X . . i 

Two ampersands must be used to represent 
an ampersand that is not part of a variable 
symbol. Only one ampersand becomes part of 
the character value assigned to the SETC 
symbol. This statement assigns value HALF* 
to the SETC symbol (AND: 

(Name (Operation (Operand | 

| (AND (SETC | i HAjLF(( - | 

t X— . —J 



Substring Notation 

The character value assigned to a SETC 
symbol may be a substring character value, 
to permit the programmer to assign part of 
a character value to a SETC symbol. If the 
programmer wants to assign part of a char- 
acter value to a SETC symbol, he must ind- 
icate to the assembler in the operand field 
of a SETC instruction: (a) the character 
value itself, and (b> the part of the char- 
acter value he wants to assign to the SETC 
symbol. The combination of (a) and Cb) is 
a substring notation; the value is referred 
to as a substring character value. 

Substring notation consists of a charac- 
ter expression, immediately followed by two 
arithmetic expressions that are separated 
by a comma and enclosed in parentheses? the 
expressions may be any expression that is 
allowed in the operand field of a SETA 
instruction. The first expression indi- 
cates the first character in the character 
expression that is to be assigned to the 
SETC symbol in the name field. The second 
expression indicates the number of consecu- 
tive characters in the character expression 
(starting with the character indicated by 
the first expression) that are to be 
assigned to the SETC symbol. 

The maximum size substring character 
value that can be assigned to a SETC symbol 
is eight characters; 255 characters is the 
maximum size character expression that the 
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substring character value can be chosen 

from. 



These are valid substring notations! 



•SALPHA' C2 f 5) 
•AB%4' (SAREA+2,1) 
•SALPHA.RST» (6, SA) 
•ABC4GAMMA f (SA,SAREA+2) 



These are invalid substring notations! 



• SBETA' (**,6) 



•L' •SYMBOL 1 
(142-SXYZ) 

"AB%1S ALPHA 1 
(8SFIELD*2) 

•BETA 1 ** ,6 



(blanks between charac- 
ter value and arithmetic 
expressions) 

Conly one arithmetic 
expression) 

(arithmetic expressions 
not separated by comma) 

(arithmetic expressions 
not enclosed in 
parentheses) 



Using SETC Symbols 

The character value assigned to a SETC 
symbol is substituted for the SETC symbol 
when it is used in the name, operation, or 
operand field of a statement. Consider 
these macro definition, macro instruction, 
and generated statements: 



r T T 

| Name | Operation I Operand 

^ 



2 
3 



(MACRO 
SNAME (MOVE 

JLCLC 
SPREFIX j SETC 
SNAME (ST 

|L 
JST 

|L 

(MEND 

1 
HERE | MOVE 



HERE 



1ST 

1 1, 
j ST 
IL 



(STO, SFROM 

| SPREFIX 

| •FIELD 1 

(2 f SAVEAREA 

(2, SPREFIX SFROM 

| 2, SPREFIX STO 

(2, SAVEAREA 



|A,B 

I 

j 2, SAVEAREA 
|2,FIELDB 
|2,FIELDA 
|2,SAVEAREA 
.x 



Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX; in 2 and 
3, SPREFIX is replaced by FIELD. 

This is how the value assigned to a SETC 
symbol may be changed in a macro 
definition: 



r T — .. — „. — T 

| Name | Operation | Operand 

(. + ~ + 

j MACRO 1 


(SNAME 


MOVE 


|STO f SFROM 




LCLC 


(SPREFIX 

(•FIELD 1 


| SPREFIX 


SETC 


| SNAME 


ST 


|2 f SAVEAREA 




L 


|2 f SPREFIXSFROM 


(SPREFIX 


SETC 


(•AREA 1 




ST 


|2 f SPREFIXST0 




L 


| 2, SAVE AREA 




MEND 


I 

i 


|HERE 


MOVE 


|A,B 

t 


|HERE 


ST 


|2 f SAVEAREA 




|L 


|2,FIELDB 




ST 


(2 f AREAA 




L 


(2, SAVEAREA 



I. — 



JL J i 



Statement 1 assigns the character value 
FIELD to the SETC symbol SPREFIX. There- 
fore, SPREFIX is replaced by FIELD in 
statement 2. Statement 3 assigns the char- 
acter value AREA to SPREFIX. Therefore, 
SPREFIX is replaced by AREA, instead of 
FIELD, in statement 4. 

Here is an illustration of a substring 
notation used as the operand field of a 
SETC instruction: 



f _ — T _ 1 

(Name (Operation 

| 1 MACRO 
JSNAME (MOVE 
I IJXLC 
(SPREFIX (SETC 
| SNAME ( ST 

1 II* 
| |ST 
I |L 
| (MEND 
i I 


, . 

Operand 


"1 
, 


STO, SFROM 

SPREFIX 

•STO 1 (1,5) 

2,SAVEAREA 

2 , SPREFIXSFROM 

2, STO 

2,SAVEAREA 


1 1 
(HERE (MOVE 
i i 


FIELDA,B 




I 1 
j HERE | ST 

1 IL 

j j ST 

I |L 

L . X . . J 


2 , SAVEAREA 
2, FIELDS 
2 , FIELDA 
2, SAVEAREA 

L 


1 



Statement 1 assigns the substring char- 
acter value FIELD (the first five charac- 
ters corresponding to symbolic parameter 
STO) to the SETC symbol SPREFIX. There- 
fore, FIELD replaces SPREFIX in statement 
2. 

Concatenating Substring Notations and Char- 
acter Expressions : Substring notations may 
be concatenated with character expressions 
in the operand field of a SETC instruction. 
If a substring notation follows a character 
expression, both may be concatenated by a 
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period between the terminating apostrophe 
of the character expression and the opening 
apostrophe of the substring notation. 

For example, if 4ALPHA has been assigned 
the character value hB%H and 4BETA has 
value- ABCDEF, this statement assigns value 
AB1UBCD to 4GAMMA? 



r T T T 

(Name | Operation(Operand | 

j.„ + + 4 

|4GAMMA|SETC | * 4 ALPHA 1 . ' 4BETA 1 C2 f 3) | 

i x J. , . i 

If a substring notation precedes a char- 
acter expression or another substring nota- 
tion, both may be concatenated by writing 
the opening apostrophe of the second item 
immediately after the closing parenthesis 
of a substring notation and the opening 
apostrophe of the next item in the operand 
field. 

If the character value AB%4 is assigned 
to i ALPHA, and value 5RS to 4 ABC, either of 
these statements may be used to assign 
value AB%«»5RS to 4W0RD: 



| T T ^ 

(Name (Operation (Operand | 

(4WORD(SETC | f 4 ALPHA* (!,«*) ' 4ABC 1 | 
(SWORD (SETC | - 4ALPHA* ( 1, **> - 4ABC f (1, 3) | 

When a SETC symbol is used in the 
operand field of a SETA instruction, the 
character value assigned to the SETC symbol 
must be from one to eight decimal digits, 
which will be converted to a positive 
arithmetic value when the SETC symbol is 
replaced in the SETC instruction. 

When a SETA symbol is used in the 
operand field of a SETC statement, the 
arithmetic value is converted to an 
unsigned integer with leading 0s removed; 
If the value is 0, it is converted to a 
single 0. 



SETB 



SET Binary 



The SETB instruction assigns binary or 
1 to a SETB symbol. The format of this 
instruction is: 



r _ T — . ^ ^ 

(Name (Operation! Operand | 

(SETB (SETB | or 1 , or logical | 
| symbol | (expression enclosed in | 
I I (parentheses | 



A logical expression is evaluated to 
determine if it is true or false; binary 1 
or 0, corresponding to true or false, is 



then assigned to the SETB symbol in the 
name field. 



A logical expression consists of one 
term or a logical combination of terms. 
The terms that may be used alone or in com- 
bination with each other are arithmetic 
relations, character relations, and SETB 
symbols. The logical operators that combi- 
ne the terms are AND, OR, and NOT. 

A Idgical expression may contain two 
operators in succession only if the first 
operator is either AND or OR, and the 
second operator is NOT. A logical expres- 
sion may begin with operator NOT, not with 
operators AND or OR. 



An arithmetic relation consists of two 
arithmetic expressions connected by a rela- 
tional operator. A character relation con- 
sists of two character values connected by 
a relational operator. The relational 
operators are EQ (equal), NE (not equal), 
LT (less than), GT (greater than), IE (less 
than or equal) , and GE (greater than or 
equal) . 

Any expression that may be used in the 
operand field of a SETB instruction may be 
used as an arithmetic expression in the 
operand field of a SETB instruction. Any 
expression that may be used in the operand 
field of a SETC instruction may be used as 
a character value in the operand field of a 
SETB instruction, including substring and 
type attribute notations. The maximum size 
of the character values that can be com- 
pared is 255 characters. If the two char- 
acter values are of different lengths, the 
shorter one will always compare "less than* 
the larger one. 

Relational operators may be preceded 
immediately by one or more blanks, a clos- 
ing parenthesis, or a closing apostrophe. 
They may be followed immediately by one or 
more blanks, an opening parenthesis, an 
opening apostrophe, or an ampersand that 
introduces a variable symbol. Each rela- 
tion may or may not be enclosed in paren- 
theses; it must be separated from the log- 
ical operators by at least one blank. A 
relation enclosed in parentheses need not 
be separated by any blanks from the logical 
operators; however, blanks may be optional- 
ly placed between logical operators and 
relations enclosed in parentheses. 

If a character string containing at 
least one single apostrophe is to be sub- 
stituted for a variable symbol in a SETB 
instruction, it must meet the requirements 
described in Section 7, under "Free 
Apostrophes." 
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These are valid operand fields of SETB 
instructions: 



(SAREA+2 GT 29) 

CABX**' EQ f S ALPHA') 

(T f SABC NE T'SXYZ) 

(T f SP12 EQ 'FM 

UAREA+2 GT 29 OR SB) 

(NOT SB AND SAREA*X f 2D f GT 29) 



These are invalid operand fields of SETB 
instructions: 



Using SETB Symbols 

The logical value assigned to a SETB 
symbol is used for the SETB symbol appear- 
ing in the operand field of an AIF instruc- 
tion or another SETB instruction. 



If a SETB symbol is used in the operand 
field of a SETA instruction, or in arithme- 
tic relations in the operand fields of AIF 
and SETB instructions, binary 1 (true) and 
(false) are converted to arithmetic 
values +1 and +0* 



SB 



(not enclosed in 
parentheses) 



(TUP12 Eg •F' SB) (two terms in suc- 
cession) 

CAB***' Eg • ALPHA • (NOT operator must 
NOT SB) be preceded by AND 

or OR) 

(AND T - SP12 EQ 'F 1 ) (expression begins 

with AND) 



Evaluation of Logical Expressions 

This procedure evaluates a, logical ex- 
pression in the operand field of a SETB 
instructioni 

1* Each term (arithmetic relation, char- 
acter relation, or SETB symbol) is 
evaluated and given its logical value 
(true or false). 

2. The logical operations are performed 
from left to right. However, NOTs are 
performed before ANDs and ANDs before 
OPs. 

3. The computed result is the value 
assigned to the SETB symbol in the 
name field. 

The logical expression in the operand 
field of a SETB instruction may contain one 
or more sequences of logically combined 
terms that are enclosed in parentheses. A 
sequence of parenthesized terms may appear 
within another parenthesized sequence. 
These are examples: 

(NOT (SB AND SAREA+X'2D f GT 29)) 
(SB AND (T C SP12 Eg *F V OR SB)) 

The parenthesized portion or portions of 
a logical expression are evaluated before 
other terms are evaluated. If a sequence 
of parenthesized terms appears within 
another parenthesized sequence, the inner- 
most sequence is evaluated first. 



If a SETB symbol is used in the operand 
field of a SETC instruction, in character 
relations in the operand fields of AIF and 
SETB instructions, or in any other state- 
ment, binary 1 (true) and (false) are 
converted to character values 1 and 0. 
L'STO Eg 1 is assumed to be true, and S f STO 
Eg is assumed to be false. 





r r . — T , 


1 




(Name 
Y 


| Operat ion | Operand 


1 




(MACRO | 


<\ 




| SNAME | MOVE ) STO , SFROM 








|LCLA |SA1 








JLCLB |SB1,SB2 








JLCLC |SC1 




1 


|SB1 


JSETB | (L § STO EQ 4) 




2 


|SB2 


(SETB | (S 9 STO EQ 0) 




3 


|SA1 


(SETA |SBl 




4 


|SC1 


JSETC | , SB2 f 
|ST |2,SAVEAREA 
|L |2 f SFROMSAl 
|ST |2,STOSCl 
|L |2,SAVEAREA 
(MEND j 






(HIRE 


| MOVE | FIELDA , FIELDB 






(HERE 


|ST |2,SAVEAREA 
\L |2,FIELDB1 
|ST |2,FIELDA0 
jL |2 f SAVEAREA 






\_ m m m .,. , 


-A . JL _. 


1 



Because the operand field of statement 1 
is true, SB1 is assigned the binary value 
1. Therefore, the arithmetic value +1 is 
substituted for SB1 in statement 3. 
Because the operand field of statement 2 is 
false, SB2 is assigned the binary value 0; 
character value is substituted for SB2 in 
statement 4. 



AIF — Conditional Branch 

The AIF instruction conditionally alters 
the sequence in which source program state- 
ments are processed by the assembler. This 
format is used: 



Section 9: How to Write Conditional Assembly Instructions 73 



I Name 



t + 

| Sequence) AIF 
[symbol | 
| or blank | 



j Operation j Operand 



I 



i 
.+ 4 

(Logical expression 
| enclosed in parenthes- 
ises, immediately fol- 
| lowed by sequence 
| symbol 

-JL . . . 



f T T 

| Name | Operation | Operand 
t + + . 



Any logical expression that may be used 
in the operand field of a SETB instruction 
may be used in the operand field of an AIF 
instruction. The sequence symbol in the 
operand field must immediately follow the 
closing parenthesis of the logical 
expression. 

The logical expression in the operand 
field is evaluated to determine if it is 
true or false. If true, the statement 
named by the sequence symbol in the operand 
field is the next statement processed by 
the assembler. If false, the next sequen- 
tial statement is processed by the 
assembler. 

The statement named by the sequence sym- 
bol may precede or follow the AIF 
instruction. 

If an AIF instruction is in a macro 
definition, the sequence symbol in the 
operand field must appear in the name field 
of a statement in the definition. If. AIF 
appears outside macro definitions, the 
sequence symbol in the operand field must 
appear in the name field of a statement 
outside macro definitions, and any attri- 
butes used in the logical expression must 
be those of previously defined symbols. 

These are valid operand fields of AIF 
instructions: 

UAREA+X V 2D° GT 29). READER 
(T*fcP12 EQ 'F 1 ). THERE 

These are invalid operand fields of AIF 

instructions : 



(T* fcABC NE T'CXYZ) 



.X«4F2 



CT'fcABC NE TUXYZ) .X4F2 



(no sequence 
symbol) 
(no logical 
expression) 
(blanks between 
logical expres- 
sion and 
sequence sym- 
bol) 



The following macro definition may be 
used to generate the statements needed to 
move a fullword fixed-point number from one 
storage area to another. The statements 
will be generated only if the type attri- 
bute of both storage areas is the letter F. 



(MACRO 
MOVE 
AIF 
AIF 
ST 

JL 

| ST 

|L 
END | MEND 
X 



€N 



£N 



I 

|*T,£F 

j (T f *T NE T f SF) .END 

| (T - ST NE •FM.END 

|2,SAVEAREA 

|2,fcF 

(2,4T 

|2,SAVEAREA 



The logical expression in the operand 
field of statement 1 is true if the type 
attributes of the two macro instruction 
operands are not equal. If the attributes 
are equal, the expression is false. There** 
fore, if the attributes are not equal, 
statement 4 (named by the sequence symbol 
.END) is the next statement processed by 
the assembler. If the attributes are 
equal, statement 2 (the next sequential 
statement) is processed. 

The expression in the operand of state- 
sent 2 is true if the type attribute of the 
first macro instruction operand is not F. 
If the attribute is F, the expression is 
false. Therefore, if the attribute is not 
F and the expression is true, statement 4 
(named by the sequence symbol .END) is the 
next statement processed by the assembler. 
If the attribute is F, statement 3 (the 
next sequential statement) is processed. 

If a character string containing at 
least one single apostrophe is to be sub- 
stituted for a* variable symbol in an AIF 
statement, it must meet the requirements 
described in Section 7, under "Free 
Apostrophes." 

Note : AIFB is an instruction, identical in 
format and function with AIF, which can be 
used to provide compatibility with the IBM 
OS Assembler. 



AGO — Unconditional Branch 

The AGO instruction unconditionally 
alters the sequence in which source program 
statements are processed by the assembler. 
This is the format: 

j Name | Operation j Operand j 

| Sequence (AGO (Sequence symbol j 
(symbol | | | 

| or blank) | 1 

The statement named by the sequence sym- 
bol in the operand field is the next state- 
ment processed by the assembler. 



m 



The statement named by the sequence sym- 
bol may precede or follow the AGO instruc- 
tion. If an AGO instruction is part of a 
macro definition, the sequence symbol in 
the operand field must appear in the name 
field of a statement that is in that 
definition. If an AGO appears outside 
macro definitions, the sequence symbol in 
the operand field must appear in the name 
field of a statement outside macro 
definitions. 

This illustrates the use of the AGO 
instruction: 



- — T _ T 

| Name | Operation | Operand 



1 
2 
3 



* +- 

(MACRO 
SNAME (MOVE 
|AIF 
(AGO 
. FIRST (AIF 
SNAME J ST 

J ST 

. END | MEND 



--+- 



j$T,$F 

I (TUT EQ •FM. FIRST 

I . END 

J (TUT NE T a €F).END 

|2,SAVEAREA 

|2,SF 

|2,ST 

|2,SAVEAREA 



Statement 1 determines if the type 
attribute of the first macro instruction 
operand is the letter F. If the attribute 
is F, statement 3 is the next statement 
processed by the assembler. Otherwise, 
statement 2 is processed next. Statement 2 
indicates to the assembler that statement 4 
(named by sequence symbol .END) is the next 
statement . 

Note : AGOB is an instruction , identical in 
format and function with AGO, which can be 
used to provide compatibility with the IBM 
OS Assembler. 

ANOP — Assembly No Operation 

The ANOP instruction facilitates condi- 
tional and unconditional branching to 
statements named by symbols or variable 
symbols. 

The format of this instruction is: 

I T " ' T ' ' ' 1 

| Name | Opera t ion | Operand | 

h H + -„ 4 

| Sequence | ANOP (blank | 

(symbol II I 

l JL . X . . . 1 



Instead, he must place an ANOP before the 
statement and then branch to the ANOP. 
This has the same effect as branching to 
the statement immediately after the ANOP. 

This illustrates the use of the ANOP 
instruction: 



| Name j Operation j Operand 



1 
2 
3 
4 



l_ 



MACRO 
(NAME (MOVE 
JLCLC 
JAIF 
*TYPE JSETC 
.FTYPE (ANOP 
(NAME (STSTYPE 
|L*TYPE 
| STSTYPE 
|LSTYPE 
(MEND 
A < . 



I 

|*T,SF 
j tTYPE 
| (T 1 IT EQ 
| *E* 

I 

|2,SAVEAREA 

|2,SF 

I 2, ST 

|2,SAVEAREA 

I 



'F 1 ) .FTYPE 



Statement 1 determines if the type 
attribute of the first macro instruction 
operand is the letter F. If the attribute 
is not F, statement 2 is the next statement 
processed by the assembler, otherwise, 
statement 4 is processed next. However, 
since there Is a variable symbol UNAME) in 
the name field of statement 4, the required 
sequence symbol (.FTYPE) cannot be placed 
in the name field. Therefore, an ANOP 
(statement 3) must be placed before state- 
ment 4. 

Then, if the attribute of the first 
operand is F f the next statement processed 
by the assembler is the statement named by 
sequence symbol .FTYPE. The value of tTYPE 
retains its initial null character value 
because the SETC instruction is not pro- 
cessed. Since .FTYPE names an ANOP 
instruction, the next statement processed 
ty the assembler is statement 4, which fol- 
lows the ANOP. 



CONDITIONAL ASSEMBLE ELEMENTS 

The elements that can be used in each 
conditional assembly instruction are sum- 
marized in Figure 11. Each row in this 
chart indicates which elements can be used 
in a single conditional assembly instruc- 
tion. Each column indicates the condition- 
al assembly instructions in which a parti- 
cular element can be used. 



If the programmer wants to use an AIF or 
AGO to branch to another statement, he must 
place a sequence symbol in the name field 
of the statement to which he wants to 
branch. However, if he has already entered 
a symbol or variable symbol in the name 
field of that statement, he cannot place a 
sequence symbol in the name field. 



The intersection of a column and a row 
indicates whether an element can be used in 
an instruction; if so, in what fields of 
the instruction the element can be used. 
For example, the intersection of the first 
row and the first column of the chart indi- 
cates that symbolic parameters can he used 
in the operand field of SETA instructions. 
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Variable Symbols 



i s.p. 



"T 

I 

k <~ 

| SETA 



SET Symbols 



I N r O 



| SETA J O 
I + 

J SKTB | O | 

k 4 4 

| setc I o | o 

t 4 -4 

I aif | a |o 



AGO 



A NOP 



I 



SETB 



I 



SETC 



T* 



O |0 | | | O | | O | 

N,0 | O I O* | 0* | O a 1 O* | O a 1 O* 

O | N f | O | | I 1 | 



.4 + 4 4 + + _ + + ^ 



I 



I o* i 



I 1 _ I I II....... 



I 



*Only in character relations 
a Only in arithmetic relations 



Abbreviations 
N is Name 
O is Operand 
S.P. is Symbolic 
Parameter 



T f is Type Attribute 

L* is Length Attribute 

S f is Scaling Attribute 

!• is Integer Attribute 




K 1 is Count Attribute 
N 1 is Number Attribute 
S.S. is Sequence Symbol 



Figure 11. Conditional Assembly Elements 



76 



SECTION 10: EXTENDED FEATURES OF MACRO LANGUAGE 



The extended features of the macro lan- 
guage allow the programmer to: 

1. Terminate processing of a macro 
definition. 

2. Generate error messages. 

3. Define global SET symbols. 

4. Define subscripted SET symbols. 

5. Use system variable symbols. 

6. Prepare keyword and mixed-mode macro 
definitions and write keyword and 
mixed-mode macro instructions. 

7. Use other macro definitions. 



MEXIT — MACRO DEFINITION EXIT 

The MEXIT instruction, used only in a 
macro definition, indicates to the assem- 
bler that it should terminate processing of 
a macro definition. The format is: 



r -t ■ — t ■ T 

I Name | Operation! Operand | 

(Sequence (MEXIT (Blank | 

I symbol | | ( 

(or blank) | | 

i . . x . x . 1 

If the assembler processes the MEXIT 
instruction in a macro definition corres- 
ponding to an outer macro instruction, the 
next statement processed by the assembler 
is the next statement outside macro 
definitions. 

If the assembler processes the MEXIT in 
a macro definition corresponding to a 
second- or third-level macro instruction, 
the next statement processed is the next 
statement after the second- or third- level 
macro instruction in the macro definition. 

MEXIT should not be confused with MEND, 
which indicates the end of a macro defini- 
tion. MEND must be the last statement of 
every macro definition, including those 
that contain one or more MEXIT 
instructions. 

This illustrates the use of the MEXIT 
instruction: 



r T - T _ 

| Name | Operation | Operand 





| (MACRO 


1 




(NAME (MOVE 


|£T, feF 


1 


|AIF 


| (TUT EQ * 


2 


| MEXIT 


1 


3 


.OK (ANOP 


1 




| (NAME | ST 


(2 f SAVEAREA 




1 [L 


|2,SF 




(ST 


(2, ST 




I* 


|2,SAVEAREA 




(MEND 


1 




- X 


X- 



F" ) -OK 



Statement 1 determines if the type 
attribute of the first macro instruction 
operand is the letter F. If the type is f, 
the assembler processes the remainder of 
the macro definition, starting with state- 
ment 3. Otherwise, statement 2 is pro- 
cessed next. statement 2 indicates to the 
assembler that processing of the macro 
definition is to be terminated. 

MNOTE — Request for Error Message 

The MNOTE instruction reguests the as- 
sembler to generate an error message or 
comments line. This instruction is prin- 
cipally used with conditional assembly 
statements, either in macro definitions or 
assembler language source code. The format 
is: 



(Name 



h 

| Seguence | MNOTE 
(symbol | 
(or | 
| blank i 



- T . T . 

| Operat ion ( Operand 



(Severity code, fol- 
| lowed by comma, fol- 
| lowed by any comfcina- 
| tion of characters en- 
(closed in apostrophes 
-X . , „ 



If the first operand field is an abso- 
lute or null value, the MNOTE causes an 
error message to be generated, and the 
value is treated as a severity code. This 
severity code may be a decimal integer from 
through 255. A null value is treated as 
a value 0. A severity code value of 
remains 0, and the message is not included 
in the error count. A severity code value 
of 1 remains 1 and causes the error count 
to be incremented and a W to appear on the 
error message. A severity code value of 2 
or greater is set to 2 and causes the error 
count to be incremented and an E to appear 
on the error message. The maximum number 
of characters allowed in the error message? 
character string is 226. 
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An asterisk in the first operand indi- 
cates that the MNOTE is to generate a com- 
ments line. The error level and count are 
unaffected by such a statement. A maximum 
of 100 characters is allowed in the follow- 
ing character string. 

When an MNOTE instruction is processed 
by the assembler, the characters enclosed 
in apostrophes are provided in the source 
program listing, in the same way as other 
error messages. When the assembler encoun- 
ters an MNOTE instruction in assembler lan- 
guage source code in a conversational as- 
sembly, it will interpret processing to 
prompt the user for corrections. 

Two apostrophes must be used to repre- 
sent an apostrophe enclosed in apostrophes 
in the operand field of an MNOTE instruc- 
tion; one apostrophe will be listed for 
each pair of apostrophes in the operand 
field. 

Any variable symbols used in the operand 
field of an MNOTE instruction will be 
replaced by the values assigned to them. 

Two ampersands must be used to represent 
an ampersand that is not part of a variable 

symbol in the operand field of an MNOTE 
statement; one ampersand will be listed for 
each pair of ampersands in the operand 
tield. 

If a character string containing at 
least one single apostrophe is to be sub- 
stituted for an operand in an MNOTE 
instruction it must meet the requirements 

described in Section 1, under "Free 
Apostrophe.* 

This example illustrates the use of 
MNOTE In a macro definition. The MNOTE 
instruction is valid anywhere in an assem- 
bler language source program* 



r 


-T 


T „_„ 




(Name 


1 Operat. 


ion | Operand 




^ .. 


-+— 

| MACRO 


.— + .„„„_— _— 




| SNAMEfMOVE 


|*T # fcF 




1 | 


|AJF 


| CT'ST NE T V €F>.N1 




2 | 


AIF 


| (TUT NE •F 1 ) .M2 




3 |4NAME|ST 
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Statement 1 determines if the type 
attributes of both macro instruction 
operands are the same. If they are, state- 



ment 2 is the next statement processed by 
the assembler. Otherwise, statement *4 is 
the next statement processed. Statement ** 
causes an error message — TYPE NOT SAME ~ 
to be printed in the source program 
listing. 

Statement 2 determines if the type 
attribute of the first macro instruction 
operand is the letter F. If the type is F f 
statement 3 is the next statement pro- 
cessed. Otherwise, statement 5 is next. 
Statement 5 causes an error message — TYPE 
NOT F — to be printed in the source pro- 
gram listing • 



GLOBAL AND LOCAL VARIABLE SYMBOLS 

These are local variable symbols: 

Symbolic parameters 
Local SET symbols 
System variable symbols 

Global SET symbols are the only global 
variable symbols. 

The GBLA, GBLB, and GBLC instructions 
define global SET symbols, just as the 
ICLA, LCLB, and JLCLC instructions define 
the SET symbols described in Section 9. 
SET symbols defined by LCLA, LCLB, and LCLC 
instructions are referred to as local SET 
symbols. 

Global SET symbols communicate values 
developed outside a macro definition to 
statements which are within macro defini- 
tions. Communication from macro defini- 
tions to macro definitions is also permiss- 
ible. However, local SET symbols communic- 
ate values between statements in the same 
lacro definition, or between statements 
outside macro definitions. 

If a local SET symbol is defined in two 
or more macro definitions, or in a macro 
definition and outside macro definitions, 
the SET symbol is considered to be a dif- 
ferent SET symbol in each case. However, a 
global SET symbol is the same SET symbol in 
each place it is defined. 

A SET symbol must be defined as a global 
SET symbol in each macro definition in 
which it is to be used as a global SET sym- 
bol. A SET symbol must be defined as a 
global SET symbol outside macro defini- 
tions, if it is to be used outside. 

If the same SET symbol is defined as a 
global SET symbol in one or more places, 
and as a local SET symbol elsewhere, it is 
considered the same symbol wherever it is 
defined as a global SET symbol, and a dif- 
ferent symbol wherever it is defined as a 
local SET symbol. 
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Defining Local and Global SET Symbols 

Local SET symbols are defined when they 
appear in the operand field of an LCLA, 
LCLB, or LCLC instruction. These instruc- 
tions were discussed in Section 9, under 
"Defining SET Symbols." 

Global SET symbols are defined when they 
appear in the operand field of a GBLA, 
GBLB, or GBLC instruction. The formats of 
these instructions are: 



r ~_ T T . — n 

[Name | Operation) Operand | 

j. x + - 4 

|Blank|GBLA f (One or more variable | 
| (GBLB, or (symbols to be used | 
j | GBLC | as SET symbols, ( 

| | (separated by commas ( 

i X_- x . . j 

The GBLA, GBLB, and GBLC instructions 
define global SETA, SETB, and SETC symbols 
and assign the same initial values as the 
corresponding types of local SET symbols. 
However, a global SET symbol is assigned an 
initial value by only the first GBLA, GBLB, 
or GBLC instruction processed in which that 
SET symbol appears. Subsequent GBLA, GBLB, 
or GBLC instructions processed by the as- 
sembler do not affect the value assigned to 
the SET symbol. The programmer should not 
define any global SET symbols whose first 
four characters are SSYS. 

If a GBLA, GBLB, or GBLC instruction is 
part of a macro definition, it must occur 
before any of the symbols which it defines 
are referenced by SET statements. 

A GBLA, GBLB, or GBLC instruction must 
precede any macro instructions which gener- 
ate references to the global instruction. 

Using Global and Local SET Symbols 

The following examples illustrate the 
use of global and local SET symbols; each 
example consists of two parts. The first 
part is an assembler language source pro- 
gram. The second part shows the statements 
that would be generated by the assembler 
after it processed the statements in the 
source program. 

Example 1 ; The same SET symbol can be used 
to communicate: (a) values between state- 
ments in the same macro definitions, and 
(b) different values between statements 
outside macro definitions. 

SA is defined as a local SETA symbol in 
a macro definition (statement 1) and out- 
side macro definitions (statement 4). &A 
is used twice within the macro definition 
(statements 2 and 3> and twice outside 
macro definitions (statements 5 and 6). 



Since £A is a local SETA symbol in the 
macro definition and outside macro defini- 
tions, it is one SETA symbol in the macro 
definition, and another SETA symbol outside 
macro definitions. Therefore, statement 3 
(in the macro definition) does not affect 
the value used for SA in statements 5 and 6 
(outside macro definitions). 



r T T ^ 

| Name | Operation | Operand 

(MACRO | 

SNAME| LOADA | 

|LCLA |SA 

*NAME|LR (15, *A 

*A j SETA |£A+1 

j MEND | 

I I 

j LCLA ((A 

FIRST J LOADA f 

|LR | 15, 4 A 

| LOADA | 

|LR |15,*A 

JEND (FIRST 

j. + x - 

FIRST | LR (15,0 
|LR |15,0 
|LR (15,0 
(LR 115,0 
(END (FIRST 
l_ X . X 






Example 2 : This example illustrates the 
use of global SET symbols to communicate a 
value developed outside a macro definition 
to a statement which is within a macro 
definition. 



r T T 

( Name | Operation | Operand 
l + . x 

MACRO 

LOACA 

GBLA 

LR 

MEND 



&NAME 



tNAME 



FIRST 
€A 



SA 



Y 

FIRST 



GBLA 
LOADA 
SETA 
LR 

LOADA 

SETA 

LR 

END 



LR 

LR 
LR 

LR 

END 



£A 
15, tA 



£A 

SA+1 
15, SA 

£A+1 
15, SA 
FIRST 



15,0 
15,1 
15,1 
15,2 
FIRST 



&A is defined as a global SETA symbol in 
a macro definition (statement 1) and out- 
side macro definitions (statement 3). €A 
is used once within the macro definition 
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(statement 2) and 4 times outside macro 
definitions (statements **, 5, 6, and 7). 

Global SET symbols may be used to com- 
municate values from macro definitions to 
macro definitions, or from statements out- 
side of macro definitions to statements 
within macro definitions. Global SET sym- 
bols may not be used to communicate values 
from within macro definitions to statements 
outside macro definitions* 

Example 3 : The same SET symbol can be used 
to communicate (a) values between state- 
ments in one macro definition, and (b) dif- 
ferent values between statements in dif- 
ferent macro definitions. 

4A is defined as a local SETA symbol in 
two different macro definitions (statements 
1 and 4). 4A is used twice within each 
macro definition (statements 2, 3, 5, and 
6). 

since 4A is a local SETA symbol in each 
macro definition, it is one SETA symbol in 
one macro definition, and another SETA sym- 
bol in the other. Therefore, statement 3 
(in one macro definition) does not affect 
the value used for 4A in statement 5 (in 
the other macro definition). Similarly, 
statement 6 does not affect the value used 
for 4A in statement 2. 



r T „ T ._. 

| Name | Operation ( Operand 



5 
6 



^ + + .. . 


I | MACRO 




| 4NAME|LOADA 




| |LCLA 


|4A 


1 * NAME I LR 


|15,4A 


|4A |SETA 


(4A+1 


| | MEND 




| | MACRO 




1 I LOADB 




| | LCLA 


|4A 


1 I^R 


|15,4A 


|4A |SETA 


| 4A*1 


| |MEND 




| FIRST |LOADA 




| I LOADB 




| | LGADA 




| ( LOADB 




1 (END 

i —-.— i.— ._«. — — — - 


(FIRST 

L , 


j. -. — ^- — - - — 


|. — 


| FIRST |LR 


15,0 


1 1 LR 


115,0 


1 I^R 


[15,0 


1 |LR 


115,0 


1 |END 


FIRST 



l A JL- 



J 



4A is defined as a global SETA symbol in 
two different macro definitions (statements 
1 and **) . 4A is used twice within each 
macro definition (statements 2, 3, 5 and 6). 



r T T y 

| Name | Operation | Operand | 

H . + — + 4 



| MACRO I 

4 NAME | LO ADA | 

| GBLA J 4A 

4NAME(LR (15, 4A 

4A (SETA |4A+1 

(MEND J 

(MACRO I 

| LOADB J 

| GBLA |4A 

(LR |15,4A 

4A | SETA (4A+1 

(MEND I 

FIRST (LOADA | 

J LOADB J 

(LOADA | 

I LOADB j 

(END (FIRST 
+ + 

FIRST | LR 1 15,0 

|LR (15,1 

|LR 1 15, 2 

(LR (15,3 

I END I FIRST 



Example H z A SET symbol can be used to 
communicate values between statements that 
are parts of two different macro 

definitions. 



L J. JL . . J 

Since (A is a global SETA in each macro 
definition, it is the same SETA symbol in 
each. Therefore, statement 3 (in one macro 
definition) affects the value used for 4A 
in statement 5 (in the other macro defini- 
tion). Similarly, statement 6 affects the 
value used for 4A in statement 2. 

Example 5 s The same SET symbol can be used 
to communicate: (a) values between state- 
ments in two different macro definitions, 
and (b) different values between statements 
outside macro definitions. 

4A is defined as a global SETA in two 
different macro definitions (statements 1 
and 4) , but it is defined as a local SETA 
outside macro definitions (statement 7). 
4A is used twice within each macro defini- 
tion and twice outside macro definitions 
(statements 2, 3, 5, 6, 8 and 9). 

Since 4A is a global SETA in each macro 
definition, it is the same SETA in each. 
However, since 4A is a local SETA outside 
macro definitions, it is a different SETA 
symbol outside. 

Therefore, statement 3 (in one macro 
definition) affects the value used fcr 4A 
in statement 5 (in the other macro defini- 
tion), but it does not affect the value 
used for 4A in statements 8 and 9 (outside 
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macro definitions). Similarly, statement 6 
affects the value used for 6A in statement 
2, but it does not affect the value used 
for &A in statements 8 and 9. 
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Subscripted SET Symbols 

Both global and local SET symbols may be 
defined as subscripted SET symbols. The 
local SET symbols defined in Section 9 were 
all unsubscripted SET symbols. 

Subscripted SET symbols provide the pro- 
grammer with a convenient way to use one 
SET symbol plus a subscript to refer to 
many arithmetic, binary, or character 
values. A subscripted symbol consists of a 
SET symbol immediately followed by a sub- 
script that is enclosed in parentheses. 
The subscript may be any arithmetic expres- 
sion that is allowed in the operand field 
of a SETA statement. The subscript of a 
variable symbol may not be an attribute of 
a subscripted variable symbol. 

These are valid subscripted SET symbols: 

4READERC17) 

SA23U56US4) 

*X<*F2(25+4A2) 

These are invalid subscripted SET 
symbols : 



(no subscript) 
(no SET symbol) 
(subscript does not 

immediately 

follow SET symbol) 



Defining Subscripted SET Symbols : if the 
programmer wants to use a subscripted SET 
symbol, he must write, in a GBLA, GELB, 
GBLC, LCLA, LCLB, or LCLC instruction, a 
SET symbol immediately followed by a decim- 
al integer enclosed in parentheses. The 
decimal integer, called a dimension, indi- 
cates the number of SET variables asso- 
ciated with the SET symbol. Every variable 
associated with a SET symbol is assigned an 
initial value that is the same as the ini- 
tial value assigned to the corresponding 
type of unsubscripted SET symbol. 

If a subscripted SET symbol is defined 
as global, the same dimension must be used 
with the SET symbol each time it is defined 
as global. The maximum dimension that can 
be used with SETA, SETB, and SETC symbols 
is 255. 

The following statements define the 
global SET symbols SSBOX, fcWBOX, and *PSW, 
and the local SET symbol 4TSW. 6SBOX has 
50 arithmetic variables associated with it, 
tWBOX has 20 character variables, and *PSW 
and 4TSW have 230 binary variables each. 

r T — . . T ^ 

(Name (Operation (Operand | 

| (GBLA |£SBOX(50) | 

| (GBLC |€WBOX(20) \ 

| | GELB |*PSW(230) | 

| j LCLB |*TSW(230) | 

I- J. X J 

Using Subscripted SET Symbols : After the 
programmer has associated a number of SET 
variables with a SET symbol, he may assign 
values to each of the variables and use 
them in other statements. 

If the statements in the previous 
example were parts of a macro definition 
(and £A was defined as a SETA in the same 
definition), these statements could be 
parts of the same macro definition. 





r T . .„. 

(Name (Operat 

| &A | SETA 
J&PSWUA) JSETB 
|STSW(9) |SETB 
1 IA 
| ICLI 
t- X 


— « T 

ion) Operand 

15 

| (6 LT 2) 
| UPSWUA)) 
|2,=F v €SBOXC<l5)' 
lAREAjC^WBOXd?) 1 
X 


— 1 

1 

-H 

— j 


1 

2 
3 

5 



Statement 1 assigns the arithmetic value 
5 to the unsubscripted SETA symbol &A. 
Statements 2 and 3 then assign the binary 



Section 10: Extended Features of Macro Language 81 



value to subscripted SETB symbols £PSW(5) 
and &TSW(9). Statements 4 and 5 generate 
statements that add the value assigned to 
&SBOXC45) to general register 2, and com- 
pare the value assigned to fcWBOX(17> to the 
value stored at AREA. 



SYSTEM VARIABLE SYMBOLS 

System variable symbols are variable 
symbols to which the assembler automatical- 
ly assigns values. The five local system 
variable symbols USYSNDX, 4SYSECT, iSYSS- 
typ, &SYSLIST, and fcSYSPSCT) may be used in 
the name, operation , and operand fields of 
statements in macro definitions, but not in 
statements outside macro definitions. They 
may not be defined as symbolic parameters 
or SET symbols, nor may they be assigned 
values by SETA, SETB, and SETC. &SYSDATE 
and &SYSTIME are global system variable 
symbols to which the assembler assigns 
values. They may be used in macro defini- 
tions and in assembler language source 
code. They may not be defined or altered. 



ISYSNDX 



Macro Instruction Index 



The system variable symbol &SYSNDX may 
be concatenated with other characters to 
create unique names for statements 
generated from the same model statement. 

fcSYSNDX is assigned the 4-digit number 
0001 for the first macro instruction pro- 
cessed by the assembler, and it is incre- 
mented by one for each subsequent inner and 
outer macro instruction processed. 



It &SYSNDX is used 
SETC or MNOTE instruct 
relation in a SETB or 
value substituted for 
digit number of the ma 
processed, including 1 
&SYSNDX appears in ari 
(in the operand field 
tion) , the value used 
arithmetic value. 



in a model statement, 
ion, or a character 
AIF instruction, the 
fcSYSNDX is the <*- 
cro instruction being 
eading 0s. If 
thmetic expressions 
of a SETA instruc- 
tor &SYSNDX is an 



Throughout one use of a macro defini- 
tion, the value of fcSYSNDX may be consider- 
ed a constant, independent of any inner 
macro instruction in that definition. 

The accompanying example illustrates 
these rules. It is assumed that the first 
macro instruction processed, OUTERl, is the 
106th macro instruction processed by the 
assembler. Statement 7 is the 106th macro 
instruction processed. Therefore, &SYSNDX 
is assigned 0106 for that macro instruc- 
tion. The number 0106 is substituted for 
fcSYSNDX when it is used in statements 4 and 
6. statement ** assigns the character value 
0106 to the SETC symbol SNDXNUM and state- 
ment 6 creates the unique name B0106. 



Statement 5 is the 107th macro instruc- 
tion processed. 4SYSNDX is assigned the 
number 0107 for that macro instruction. 
0107 is substituted for fcSYSNDX in state- 
ments 1 and 3. 0106 is substituted for the 
global SETC symbol SNDXNUM in statement 2. 

Statement 8 is the 108th macro instruc- 
tion processed. Each occurrence of SSYSNDX 
is replaced by 0108. Statement 6 creates 
the unique name B0108. 
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When statement 5 processes the 108th 
macro instruction, statement 5 becomes the 
109th macro instruction processed. Each 
occurrence of &SYSNDX is replaced by 0109. 
Statement 1 creates the unique name A0109. 

&SYSECT — Current Control Section 

The system variable symbol SSYSECT 
represents the name of the control section 
in which a macro instruction appears. For 
each inner and outer macro instruction pro- 
cessed, 4SYSECT is assigned a value that is 
the name of the control section in which 
the iracro instruction appears. 
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When fcSYSECT is used in a macro defini- 
tion, the value substituted for £SYSECT is 
the name of the last CSECT, DSECT, or START 
statement that occurs fcefore the macro 
instruction. If no named CSECT, DSECT, or 
START statements occur before a nracro 
instruction, SSYSECT is assigned a null 
character value for that macro instruction. 
CSECT or DSECT statements processed in a 
macro definition affect the value of €SY- 
SECT of any subsequent inner macro instruc- 
tions in that definition, and for any other 
outer and inner macro instructions. Throu- 
ghout the use of a macro definition, the 
value of £SYSECT may be considered a con- 
stant, independent of any CSECT or DSECT 
statements or inner macro instructions in 
that definition. 



The next example illustrates these 
rules. 



I Name 
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1 |DC 


|AUSYSECT) 


| (MEND 
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r ^ T — — 
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1 |DC 
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1 |DC 


|A(MAINPROG) 


1 (DC 


|A(INB) 



Statement 8 is the last CSECT, DSECT, or 
START statement processed before statement 
9. Therefore, SSYSECT is assigned the^ 
value MAINPROG for macro instruction OUTER1 
in statement 9. MAINPROG is substituted 
for &SYSECT when it appears in statement 6. 



Statement 3 is the last CSECT, DSECT, or 
START statement processed before statement 
<*. Therefore, SSYSECT is assigned CSOUT1 
for macro instruction INNER in statement 4. 
CSOUT1 is substituted for fcSYSECT when it 
appears before statement 2. 

Statement 1 is used to generate a CSECT 
statement for statement 4. This is the 
last' CSECT, CSECT, or START statement that 
appears before statement 5. Therefore, 
6SYSECT is assigned INA for macro instruc- 
tion INNER in statement 5. INA is substi- 
tuted for fcSYSECT when it appears in state- 
ment 2. 

Statement 1 is used to generate a CSECT 
statement for statement 5. This is the 
last CSECT, DSECT, or START statement that 
appears before statement 10. Therefore, 
6SYSECT is assigned INB for macro instruc- 
tion OUTER2 in statement 10. INB is sub- 
stituted for SSYSECT when it appears in 
statement 7. 

&SYSSTYP — Current Control Section Type 

The system variable symbol 4SYSSTYP 
represents the mnemonic operation which 
defined the name of the control, prototype, 
dummy, or common section in which a macro 
instruction appears. 

When SSYSSTYP is used in a macro defini- 
tion, its substituted value is one of the 
character string values CSECT, PSECT, 
DSECT, or COM. The value used will corres- 
pond to the mnemonic operation which 
defined the name represented by system 
variable symbol fcSYSECT. A section defined 
by the START instruction is considered to 
be a CSECT. SSYSSTYP enables the macro 
language programmer to resume the current 
control section after it is interrupted, 
without requiring the section type to fce 
supplied as a parameter. 
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In the example above, statement 1 is a 
model statement to initiate the prototype 
control section PRO. Statement 2 generates 
an address constant of the entry point of 
subroutine fHJBR. Statement 3 reinstates 
the interrupted control section MAINPROG. 
The* macro instruction does not require that 
the* nam** or type of the original control 
s«'ct ion be stated as a parameter. 



j:; yslist — Macro Instruction Operand 

System variable symbol fcSYSLIST provides 
the programmer with an alternative to sym- 
bolic parameters for referring to macro 
inst ruction operands. 



Header 
Prototype | 
Model 

Model 

Model 

Model 



r T T . — . ^ 

[Name | Operation | Operand | 
h + + 4 

| MACRO 
| TOTAL 



1ST 



|NUM, REG, AREA 

SSYSLISTC2) , 
£SYSLIST(1,1) 

SSYSLIST(2), 
|£SYSLIST<1,2> 

|SSYSLISTC2) f 
|£SYSLIST(1,3) 

SSYSLISTC2) , 
|fcSYSLIST(3) 



fcSYSLIST and symbolic parameters may be 
used in the same macro definition. fcSYS- 
LIST also may be used in place of symbolic 
parameters. 



*.SY5LIST(n> may be used to refer to the 
nth macro instruction operand. In addi- 
tion, if the nth operand is a subiist, then 
4SYSLISTCn,m) may be used to refer to the 
mth operand in the subiist, where n and m 
may be any arithmetic expressions, greater 
than zero, allowed in the operand field of 
a SETA statement. 



The type, length, scaling, integer, and 
count attributes of fcSYSLIST(n) and 
4SYSLISTlm,m) , and the number attributes of 
*SYSLIST(n> and fcSYSLIST, may be used in 
conditional assembly instructions. N f fcSYS- 
LIST may be used to refer to the total num- 
ber of operands in a macro instruction 
statement. N* fcSYSLIST (n) may be used to 
refer to the number of operands in a sub- 
list. If the nth operand is omitted, N* is 
0; if the nth operand is not a subiist, N" 
is 1 . 



Trailer 

Macro 

Generated 

Generated 

Generated 

Generated 



L 



MEND 

+ 

TOTAL 

|L 
I * 
|A 

1ST 



(A,B f C> ,6, SUM 
|6,A 
|6,B 

|6,C 
| 6 , SUM 



L J. . JL_. J 



The generated statements in the above 
examples are exactly the same as the 
generated statements of the example under 
"Operand Sublists" of Section 8, "How to 
Write Macro Instructions." 



feSYSPSCT — Prototype Control Section Name 

The system variable symbol fcSYSPSCT 
represents the name of the first prototype 
control section defined in the source 
program. 



The following procedure is used to eva- 
luate N'iSYSLIST: 



A sublist is considered to be one 
operand. 



The number of operands equals 1 plus the 
number of commas indicating the end of 
an operand. 



Attributes were discussed in Section 7 
under "Attributes." 



When 4SYSPSCT is used, the value substi- 
tuted for fcSYSPSCT is the name of the first 
PSECT statement in the source program. If 
no PSECT statement has occurred prior to 
the use of 4SYSPSCT, the value assigned to 
SSYSPSCT is that of a null character str- 
ing. SSYSPSCT may be used when writing re- 
enterable programs. It provides the macro 
language programmer with the ability to 
generate instructions within a prototype 
control section without requiring that the 
name of the PSECT be supplied as an expli- 
cit parameter. Thus, the macro instruction 
OUTLINE, from the previous example, might 
be rewritten as shown below, where PRO was 
the first PSECT declared in the program. 



8*1 



r t- 1 

j Name (OperationlOperand 

L , x . 1 


1 


r ._ T T 

[Name [OperationlOperand 


T 

I 
i 


i T 




1 


1 j macro 






| [CSECT # 






[CLOC [OUTLINE 


| 6RTFE 




1 1 • 






| £SYSPSCT|PSECT 






I 1 • 






| & LOC j DC 


| AURTNE) 




i ( • 






| 4SYSECT j SSYSSTYP 






I | GATWR 


[DATE, LENGTH 1 




1 (MEND 






| [GATWR 


|TIME,LENGTH2 




L X 


_X — „„—— 


_ «.«._ J 


1 ( * 














|MAINPR(X;|CSECT 






1 1 • 






1 |L 


| l f ADDR 




1 1 • 






[ADDH j OUTLINE 


JSUBR 




f DATE | DC 


[C'SSYSDATE* 




1 |L 

L , X — , 


|2,X 

_X— ™, — - 


—-——J 


[IENGTH1|DC 
[TIME [DC 
[LENGTH2JDC 


\F'B 9 
ICtSYSTIME* 




|MAINPROG|CSECT 


-~f„- .-. — 


1 




I |L 


|1,ADDR 




1 I • 






| PRO 1 PSECT 






[ [ • 






JADDR [DC 


|A(SUBR) 




1 1 • 






|MAINPROG|CSECT 






| |END 






I |L 


|2,X 




Y x 


™ X 


— 4 


L_ X- 


-X, . . 


— J 


1 [03/18/71 

2 |09:30:15 

l 




— j 


4SYSDATE and 4SYSTIME — Date/Time 










Variables 






In the following example, the macro 





The global system variables 4SYSDATE and 
CSYST1ME represent the date and time as set 
by the system during assembly. These sym- 
bols are available in open code as well as 
in macro definitions. The values for these 
symbols are set only once during an assem- 
bly? they cannot be changed by the program- 
mer. GBLC statements are not required to 
refer to these variables, and a duplicate 
symbol diagnostic will be issued if these 
symbols are defined. 



When either 4SYSDATE or SSYSTIME are 
encountered in a source program, the assem- 
bler will substitute the value from the 
version identification for the assembly. 

fcSYSDATE is a GBLC variable symbol of 
the form: 

mo/da/yr 

where mo is the month, da is the day, and 
yr is the year. fcSYSTIME is a GBLC vari- 
able symbol of the form 

hh :mm:ss 

where hh is the hour (24 hour clock), mm is 
minutes, and ss is seconds. 

In the following example, the programmer 
is using the GATWR macro instruction to 
write the date and time of this program* s 
assembly onto his SYSOUT. fcSYSDATE and 
fcSYSTIME are set by the assembler when 
first encountered; they are both eight 
characters in length. When the GATWR macro 
instruction is executed, the output will 
consist of statements 1 and 2. 



TODAY is defined to obtain the date from 
the fcSYSDATE variable. 6M is set to the 
ironth, £E is set to the day, and €Y is set 
to the year. When the macro definition is 
referenced, registers 3, k § and 5 will con- 
tain the month, day, and year respectively- 





j Name } Operati 


on [Operand | 
i 1 


Header 


r 


T 

j MACRO 


Prototype 




[TODAY 


|tRl,€R2,£R3 | 


Model 




[LCLC 


|*M,SD,4Y | 


Kodel 


|*M 


[SETC 


[•SSYSDATE 1 (1,2) | 


Model 


|4D 


|SETC 


[ f 4SYSDATE - (4,2) | 


Model 


|SY 


[SETC 


[•SSYSDATE 1 (7,2) [ 


Model 




|IA 


(&R1,£M | 


Model 




[LA 


[£R2,£D | 


Model 




|IA 


|€R3,€Y | 


Trailer 




[MEND 


i 1 




f 


~+ 


_ + 4 


Macro 




[ TODAY 


|3.*#5 | 


Generated 




[LA 


|3,03 | 


Generated 




[LA 


[<*,18 | 


Generated 


l 


[LA 


15,71 | 


KEYWORD MACRO 


DEFINITIONS AND INSTRUCTIONS 



Keyword macro definitions provide the 
programmer with an alternative way of pre- 
paring macro definitions. 

A keyword macro definition reduces the 
number of operands in each macro instruc- 
tion that corresponds to the definition; 
the operands may be written in any order. 

The macro instructions that correspond 
to the macro definitions (positional macro 
instructions and positional macro defini- 
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tions) , described in Section 7, require 
that the operands be written in the same 
order as the corresponding symbolic parame- 
ters in the operand field of the prototype 
statement . 

In a keyword macro definition, the pro- 
grammer can assign standard values to any 
symbolic parameters appearing in the 
operand field of the prototype statement. 
The standard value assigned to a symbolic 
parameter is substituted for the symbolic 
parameter if the programmer does not write 
anything in the operand field of the macro 
instruction to correspond to the symbolic 
parameter. When a keyword macro instruc- 
tion is written , the programmer need write 
only one operand for each symbolic paramet- 
er whose value he wants to change. 

Keyword macro definitions are prepared 
the same way as positional macro defini- 
tions, except that the prototype statement 
is written differently, and fcSYSLIST may 
not be used in the definition. The rules 
for preparing positional macro definitions 
are in Section 7. 

K eyword Prototype 

The format of this statement is: 



*AREA= X'lSSA 1 



r 

| Name 



> 

(Symbolic | Symbol 
| pa ram- j 
Jeter or | 
(blank | 



- T T . 

| Operation | Operand 



H 



I One or more operands 

(of form described J 

| below, separated by j 

j commas | 



Each operand must consist of a symbolic 
parameter, immediately followed by an equal 
sign and optionally followed by a standard 
value. A standard value that is part of an 
operand must immediately follow the equal 
sign . 

Anything that may be used as an operand 
in a macro instruction, except variable 
symbols, may be used as a standard value in 
a keyword prototype statement. The rules 
for forming valid macro instruction 
operands were detailed in Section 8. 

These are valid keyword prototype 
operands: 

4READER= 

&LOOP2=SYMBOL 

&S4==F , **096 i 

These are invalid keyword prototype 

operands: 



CARDAREA 
fcTYPE 
CTWO =123 



(no symbolic parameter) 
(no equal sign) 
(equal sign does not 



immediately follow 
symbolic parameter) 
(standard value does not 
immediately follow 
equal sign) 



The following keyword prototype state- 
ment contains a symbolic parameter in the 
name field, and four operands in the 
operand field? the first two operands con- 
tain standard values. The mnemonic opera- 
tion code is MOVE. 



| Name (Operation j Operand 

|. x + — 

j*N (MOVE |*R=2, SA=S,fcT=,4F= 

i X . X 



Keyword Macro Instruction 

After a programmer has prepared a key- 
word macro definition, he may use it by 
writing a keyword macro instruction. 

The format of a keyword macro instruc- 
tion is: 

r . r r — 1 

(Name (Operation (Operand | 

(Symbol, (Mnemonic |0 or more operands of j 
| sequence j operation | form described below, | 
(symbol, (code (separated by cosrmas j 
(or blank) | | 

t_. A X . . . . J 

Each operand consists of a keyword imme- 
diately followed by an equal sign and an 
optional value. Any valid operand in a 
positional macro instruction may be used as 
a value in a keyword macro instruction. 
The rules for forming valid positional 
iiacro instruction operands were detailed in 
Section 8. 

A keyword consists of one through seven 
letters and digits, the first of which must 
be a letter. The keyword part of each key- 
word macro instruction operand must corres- 
pond to one of the symbolic parameters 
appearing in the operand field of the key- 
word prototype statement. A keyword corre- 
sponds to a symbolic parameter, if the 
characters of the keyword are identical to 
the characters of the symbolic parameter 
that follow the ampersand. 

These are valid keyword macro instruc- 
tion operands: 

LOOP2=SYMBOL 
S4==F , 4096 f 

T0= 

These are invalid keyword macro instruc- 
tion operands: 
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*X**F2=0(2 f 3) 



CARDAREA=A*2 



(TO (8), (FROM) 



(keyword does not begin 

with a letter) 
(keyword is more than 

seven characters) 
(no keyword) 



The operands in a keyword macro instruc- 
tion may be written in any order. If an 
operand appeared in a keyword prototype 
statement, a corresponding operand need not 
appear in the keyword macro instruction. 
If an operand is omitted, the comma that 
would have separated it from the next 
operand need not be written. 

The following rules are used to replace 
the symbolic parameters in the statements 
of a keyword macro definition: 

1. If a symbolic parameter appears in the 
name field of the prototype statement, 
and the name field of the macro 
instruction contains a symbol, the 
symbolic parameter is replaced by the 
symbol. If the name field of the 
macro instruction is blank or contains 
a sequence symbol, the symbolic para- 
meter is replaced by a null character 
value. 

2. If a symbolic parameter appears in the 
operand field of the prototype state- 
ment, and the macro instruction con- 
tains a keyword that corresponds to 
the symbolic parameter, the value 
assigned to the keyword replaces the 
symbolic parameter. 

3. If a symbolic parameter was assigned a 
standard value by a prototype state- 
ment, and the macro instruction does 
not contain a keyword that corresponds 
to the symbolic parameter, the stan- 
dard value assigned to the symbolic 
parameter replaces the symbolic para- 
meter. Otherwise, the symbolic para- 
meter is replaced by a null character 
value. 



Note s If a standard value is a self- 
defining term, the type attribute assigned 
to the standard value is N. If a standard 
value is omitted, the type attribute 
assigned is 0. All other standard values 
are assigned the type attribute appropriate 
to their type. 

The following keyword macro definition, 
keyword macro instruction, and generated 
statements illustrate these rules. 

Statement 1 assigns standard values 2 
and S to symbolic parameters £R and 6 A. 
Statement 6 assigns values FA f FB, and 
THERE to keywords T f F, and A. The symbol 
HERE is used in the name field of statement 
6. 



Since a symbolic parameter UN) appears 
in the name field of the prototype state- 
ment (1) , and the corresponding characters 
(HERE) of the macro instruction (6) are a 
symbol, *N is replaced by HERE (in 2). 



r T . . — T ~ „ 

| Name | Operation I Operand 

| | MACRO | 

|€N (MOVE |*R=2,*A= 

jtN |ST |*R,tA 



(MACRO 
(MOVE 
|ST 
|L 
| ST 



I 
|*R=2,*A=S f €T=, 

|*R,tA 
|£R,6F 
**R,ST 



*F= 



-H 



j |ST |*R,€T 

| |L |6R,*A 

| JMEND | 

(HERE (MOVE ( T=FA,F=FB,A=THERE 

(HERE (ST | 2, THERE 

I |L |2,FB 

1 | ST | 2, FA 

| |L | j 2, THERE 

I X X 



Since €T appears in the operand field 
(statement 1), and statement 6 contains the 
keyword (T) that corresponds to *T, the 
value assigned to T (FA) replaces €T (in 
<*). Similarly, FB and THERE replace CF and 
£A (in 3 and in 2 and 5). Note that the 
value assigned to &A in statement 6 is used 
instead of the value assigned to 4A in 
statement 1. 

Since £R appears in the operand field of 
statement 1, and statement 6 does not con- 
tain a corresponding keyword, the value 
assigned to «R (2) replaces €R (in 2, 3, 4, 
and 5) • 

Operand Sublists : The value assigned to a 
keyword and the standard value assigned to 
a symbolic parameter may be an operand sub- 
list. Any valid operand sublist in a posi- 
tional macro instruction may be used as a 
value in a keyword macro instruction and as 
a standard value in a keyword prototype 
statement. The rules for forming valid 
operand sublists were detailed in Section 8 
under "Operand Sublists." 

Keyword Inner Macro Instructions : Keyword 
and positional inner macro instructions may 
be used as model statements in either key- 
word or positional macro definitions. 



MIXED-MODE MACRO DEFINITIONS AND 
INSTRUCTIONS 

Mixed-mode macro definitions allow the 
programmer to use the features of keyword 
and positional macro definitions in the 
same macro definition. 

Mixed-mode macro definitions are pre- 
pared in the same way as positional macro 
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definitions, except that the prototype 
statement is written differently, £SYSLIST 
may be used to reference the positional 
operands. The rules for preparing posi- 
tional macro definitions are in Section 7. 

J^i xed- Mode Prototype 

The format of this statement is: 

r . — T T ^ 

(Name (Operation (Operand | 

J Symbolic J symbol (Two or more operands | 

jpararo- | | of form described j 

|eter or | (below, separated by j 

(blank | (commas | 

I . J. A J 

The operands roust be valid operands of 
positional and keyword prototype state- 
ments. All positional operands must pre- 
cede the first keyword operand. The rules 
for forming positional operands were dis- 
cussed in Section 7 under "Macro Instruc- 
tion Prototype," 

The following sample mixed-mode proto- 
type statement contains three positional 
operands and two keyword operands. 

r T T 1 

(Name (Operat ion | Operand | 

I ._ + a 4 

|£N (MOVE (STY, £P, £R, £TO=, £F= | 

I A A . . J 

Mixed-Mode Macro Instruction 
The format for this is: 

(Name (Operat ion (Operand | 

(Symbol, (Mnemonic (0 or more operands of j 

| sequence | operation | form described below, j 

(symbol, | code (separated by commas j 

(or blank | | | 

L A A J 

The operand field consists of two parts* 
The first part corresponds to the position- 
al prototype operands and is written in the 
same way as the operand field of a posi- 
tional macro instruction. The rules for 
writing positional macro in structions are 
in Section 8. 

The second part of the operand field 
corresponds to the keyword prototype 



operands and is written in the same way as 
the operand field of a keyword macro 
instruction. 

The following mixed-mode macro defini- 
tion, mixed-mode macro instruction, and 
generated statements illustrate these 
facilities. 



j Name j Operation j Operand 

| | MACRO 

1 |£N (MOVE 

| £N | ST£TY 

I j L£TY 

| |ST£TY 

| |L£TY 

| I MEND 



|£TY, £P, £R,£TO=, £F= 

|£R,SAVE 

|£R, £P£F 

|£R,£P£TO 

|£R,SAVE 



h 



2 |HERE (MOVE | H, , 2, F=FB,TO=FA 

(HERE (STH | 2, SAVE 
| |LH |2,FB 
| | STH | 2, FA 
| |LH | 2, SAVE 

t A A . J 

The prototype statement (1) contains 
three positional operands (£TY, £P, and £R> 
and two keyword operands (£TO and £F) . In 
the macro instruction (2), the positional 
operands are written in the same order as 
the positional operands in the prototype 
statement (the second operand is omitted) . 
The keyword operands are written in an or- 
der that is different from the order of 
keyword operands in the prototype 
statement. 

Mixed-mode inner macro instructions may 
be used as model statements in mixed-mode, 
keyword, and positional macro definitions. 
Keyword and positional inner macro instruc- 
tions may be used as model statements in 
mixed-mode macro definitions. 



MACRO DEFINITION COMPATIBILITY 

Macro definitions prepared for use 
with other IBM assemblers having macro 
language facilities may be used with 
the TSS assembler, provided that all 
SET symbols are defined in an appropri- 
ate LCLB, GBLA, GBLB , or GBLC statement. 
The AIFB and AGOB instructions will be 
processed by the TSS assembler in the 
same way that AIF and AGO are processed. 



Bh 



APPENDIX A: ASSEMBLER INSTRUCTIONS 



Name 



- T T _ 

| Operation | 



operands 



Specified as 



I tiymboi J 



(symbol) 



--+■ 



± 

[symbol! 



I symbol] 
[symbol] 






I- 

I symbol ] 



CCW 



CNOP 



COM 



COPY 

CSECT 






CXD 
DC 






DROP 



DS 



-+ 



command code 

, data address 

, flag values 
f count 



Absolute, relocatable, or 
complex expression • 
H „ 

Absolute expression. 



byte alignment, 

i double \ 

word type I > 

(single) 

same as CSECT 



Absolute expression. 
+ 



symbol name 



(public storage] 
(,read only storage] 
[, variable section length] 
(, privileged section] 
[, section includes SYS entry 
points] 



none 






(duplication factor] 
constant type 

length J [ 
L (bytes) J 
[scale] 
(exponent] 
constant [, . . .] 



One or more additional 
operands, separated by 
comma (s), may be specified. 

(regl C,reg2, . . .,regl6) ) | Absolute value. Default = 

all currently active base 
registers. 



Same as DC except as 
noted below. 



See Appendix c. 



(duplication factor) 
constant type 

length j * ** J 
I ( bytes J J 
(scale! 
(exponent) 

1. Specification of 'constant' operand, optional. 

2. 'Constant' operand reserves space but does not store data. 

3. Maximum length for C and X constants, 65,535 bytes. 

4. Duplication factor of forces alignment to assumed 
alignments in DC. 



1 byte, absolute expression, 
right justified. 






b=n, where n=0, 2, **, or 6 
w=n, where n=4 or 8 



Default = standard coirmon 
section. 



Name of area to be copied. 






PUBLIC 
, READONLY 
, VARIABLE 
,PRVLGD 
, SYSTEM 






See Appendix C. 
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Name 



Operation 



Operands 



Specified as 



[symbol) 



DSECT 



none 



symbol 



DXD 



h 



[duplication factor) 
constant type 

[{ bits 
length < 
( bytes 
[scale] 
(exponent] 
(constant] 



J] 



Same as DC except as noted 
below. 



H 



^ 



EJECT 

END 



1. 'Constant 1 operand does not cause initialization to value 
specified. 

2. 'Scale' and 'Exponent 1 operands may be specified, 

3. Multiple operands and constants only used to determine 
length. 

none I 



(control transfer point] 



(symbol] 



ENTRY 
EQU 



(entry point] I,...] 



EXTRN 
ICTL 



(previously defined symbol] 

( , length] 

( f type] 



external symbol (,...) 
[beginning source column) 
( f ending source column) 
(, continue column] 



[symbol] 



ISEG 



LTORG 



(sequence field - left col) 
[sequence field - right col) 

none 



Relocatable or absolute 

expression. 

Default = first instruction 

of CSECT. 



Relocatable symbols. 



absolute integer (1-65535) 
absolute integer (0-255) 

Relocatable symbols. 

b=decimal digit, range, 

l-i»0? default*!, 
e-decimal digit, range, 

ifl-80? default»71. 
c»deciroal digit, range, 
2-1*0? default=16. 

Decimal digits, 

default = no sequence check. 



ORG 



(new location counter 
address] 



Expression ; def ault=current 
location counter positional. 



PRINT 



printing option 



listing 

no 
listing 



f /executable 

, macro gen J all 
(none 



)] 



, constants 



print full constant 
print 8 bytes 
or less 



j symbol 



I PSECT 






I] 



ON 
OFF 



FULIGEN 
GEN 
NOG EN 

DATA 
NODATA 



| same as CSECT 

.j. 



| Same as CSECT. 

-A_ 
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Name 



Operation 






Operands 



i 



Specified as 



i 

| Decimal digits, default=l. 
4„„ 4 



H 



[syroboll 



SPACE 
START 



[no. of lines to be spaced] 



h 



[symbolj 



TITLE 



(initial location ctr. address] j Self-defining term, 

I defaults. 
+ „» 

■characters' J To 100 characters. 






USING 



4 

Note: Symbol may be from 1 to 4 alphameric characters. 

| Absolute or relocatable 

| value. 

| Absolute expression. 



base value, 

regie ,reg2, . .. ,regl63 
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APPENDIX B; MACHINE INSTRUCTION FORMAT 



Basic Machine Format 



Assembler Operand 
Field Format 



Applicable 
Instructions 



RR 



8 


4 


4 


Operation 






Code 


R1 


R2 



Operation 
Code 



TTW7 



Operation 
Code 



R1,H2 



R1 



All RR instructions 
except SPM and SVC 



SPM 



I SVC 

(See notes 1 r 6 f and 8) 





8 


4 


4 


4 


12 


RX 


Operation 












Code 


R1 


X2 


B2 


D2 



R1,D2(X2,B2) 
R1,S2 (X2) 



All RX instructions 



(See notes 1-4, and 7) 



RS 



8 

Operation 

Code 


4 
R1 


4 
R3 


4 
B2 


12 

D2 



Operation 
Code 



ilX 



4 
B2 



12 
D2 



R1,R3,D2(B2) 
R1,R3,S2 



R1,D2(B2> 
R1,S2 



BXH,BXLE,LM,STM 



All shift instructions 



(See notes 1-3 9 7, and 8) 



8 

Operation 

Code 


8 
12 


4 
B1 


12 
D1 


D1 (B1) ,12 
S1,I2 










Operation 
Code 


X 


B1 


12 

D1 


D1 (B1) 
S1 



All SI instructions 
except LPSW,SSM, 
HIO,SIO,TIO,TCH f TS 



LPSW,SSM,HIO,SIO, 
TIO # TCH,TS 



(See notes 2, 3, and 6-8) 



ss 



8 

Operation 

Code 


4 
L1 


4 
L2 


4 
B1 


12 

D1 


4 
B2 


12 
D2 




8 

Operation 

Code 


8 
L 


4 
B1 


12 

D1 


4 
B2 


12 
D2 



D1 (L1,B1) f D2 (L2,B2) 
S1 (L1) ,S2(L2) 



D1 (L,B1J ,D2 (B2) 
S1 (L) ,S2 



PACK , UNPK , MVO , AP , 
CP,DP f MP,SP,ZAP 



NC f OC,XC,CLC,MVC,MVN, 
MVZ,TR,TRT,ED,EDMK 



(See notes 2, 3, 5, and 7) 
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Notes for Appendix B; 



1. Rl f R2, and R3 are absolute expres- 
sions that specify general or 
floating-point registers. General 
registers are through 15; floating- 
point registers are 0, 2, 4, and 6. 

2. Dl and D2 are absolute expressions 
that specify displacements; a value 
from to 4095 may be specified. 

3. Bl and B2 are absolute expressions 
that specify base registers; registers 

are - 15. 

4. X2 is an abolute expression that spe- 
cifies an index register; registers 
1-1S way be used as index registers. 
If a base register and no index regis- 
ter is desired, X2 may be either spec- 
ified as or omitted, with a comma 
preceding B2. 



6. 



7. 



L2 values from to 16. The assembled 
value will fce one less than the speci- 
fied value except that if is speci- 
fied, will be assembled. L may be 
defaulted; the length assigned will be 
that of the first operand. LI and L2 
may be defaulted; however, a comma 
must precede Bl and B2. If an expli- 
cit base and displacement have ijeen 
written, the defaulted (or implied) 
length will be the length attribute of 
the expression specifying the dis- 
placement. If the base and displace- 
ment have been implied, the defaulted 
length will be the length attribute of 
the expression specifying the effec- 
tive address. 

I and 12 are absolute expressions that 
provide immediate data; the value can 
be from to 255. 

SI and S2 are absolute or relocatable 
expressions that specify an address. 



Examples: 



L 2,48(0,5) 
L 2,48(,5> 



L, LI, and L2 are absolute expressions 
that specify field lengths; L value 
can be specified from to 256; Ll and 



8. RR, RS, and SI instruction fields that 
are crossed out in the machine formats 
are not examined during instruction 
execution. The fields are not written 
in the symbolic operand, but are 
assembled as binary 0s« 
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APPENDIX C; 



SUMMARY OF CONSTANTS 



Implied 1 
Length j 
Type (Bytes) | Alignment 

j. + 

c as needed] byte 









as needed ( byte 

B as needed | byte 

_, 4 ... 

F 4 | word 

x. 

H 2 j ha if word 



1 to 256 (1) 
.1 to 256 



(word 






J doubleword 






as needed ] by t e 



Z as needed | byte 

A 4 j word 

V 4 I word 

R 4 | word 
_ x 

S 2 half word 



— +■ 



1 



Y 

H 



I word 



Length 
Modifier 
Range 



.1 to 256 (1) 



.1 to 8 



.1 to 8 



.1 to 8 



.1 to 8 



-~ + 



.1 to 16 



1 to 16 

itou C3> 



1 to 4 C3> 
1 to 4 (3> 



2 only 



ihalfword |.l to 2 (3) 
1 to 4 (4> 



Specified by 



characters 



~i r 

| Number of 
| Constants 
j Per 
| Operand 

-+ 

(one 



hexadecimal digits [ one 
binary digits [one 



decimal digits 






decimal digits 



(multiple 

-+ 

| multiple 






decimal digits 



(multiple 



85 to +75 



decimal digits (multiple 
decimal digits (multiple 
decimal digits (multiple 



+ — -+ 

any expression (multiple 

relocatable symbol (multiple 

an external symbol (multiple 

one absolute or (multiple 
relocatable j 






| left. 

1 „_._ H 

| loft 



expression or two | 
absolute expres- j 
si oris: exp (exp) ( 

any expression (multiple 

x . 

symbol naming (multiple 

a DXD or DSECT | 

X i i . i X X X 

(1) In a DS assembler instruction C and X type constants may have length specification to 655 35. 

(2) L is length of constant. Negative scaling is not permitted. 

(3) Bit length specification permitted with absolute expressions only. Relocatable values may be 1, l 
3, or 4 bytes only. 

(4) No bit length specification permitted. 



Range for 
Exponents 



x— 



-85 to +75 



-85 to *75 



-85 to *75 



j Truncation/ 
Range for j Padding 
Scale ( Side 

| right 



1 left 

| left 

-187 to +346 } left 

-187 to +346 | left 

to 2L-2 <2> i right 

„ _. + 

to 2L-2 (2> j right 

( left 

1 left 

| left 



I 



I 
I 



--H 
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APPENDIX D: MACRO LANGUAGE SUMMARY 



These charts summarize the macro language 3. Chart 3 is a summary of the 
described in the second half of this manual, expressions that may be used in macro 

language statements. 



1. Chart 1 describes the name and operand 
fields of each statement. 

2. Chart 2 indicates which macro language 
elements may be used in the name and 
operand fields of each statement. 



4. Chart ** is a summary of the attributes 
that may be used in each expression, 

5, Chart 5 is a summary of the variable 
symbols that nray be used in each 
expression. t -, , 



Chart 1. 

r~- 



Statements (Part 1 of 2) 



AGO,ABOB 
A1F,AIFB 



(Operand Field 
+ , _„_. 

Sequence symbol 



(Instruction (Name Field 

^ + 

Sequence symbol 
or blank 



i 



Sequence symbol 
or blank 



Logical expression enclosed in parentheses, 
immediately followed by a sequence symbol 



ANOP 
COPY 



Sequence symbol 



Sequence symbol 
or blank 



Blank 

Symbol 






h 



GBLA,GBLB,GBLC 



r- 



LCLA,LCLB f LCLC 



Blank 
Blank 



One or more variable symbols to be used as 
SET symbols, .separated by commas 3 * w 



T - 



MACROS 
MEND* 



Blank 



One or more variable symbols to be used as 
SET symbols, separated by commas 3 



Blank 



Sequence symbol 
or blank 



Blank 



h 



MEXIT* 



Sequence symbol 
or blank 



Blank 



H 



MNOTE 



Sequence symbol 
or blank 



Severity code, followed by a comma, followed 

by any combination of characters enclosed in 

apostrophes 

. .. 1 

Arithmetic expression 



SETA 

SETB 



SETA symbol 



SETB symbol 



h 



or 1, or a logical expression enclosed in 
parentheses 



SETC 



SETC symbol 



h 



Type attribute, character expression sub- 
string notation, or concatenation of char- 
acter expressions and substring notations 



Model statement 
(any assembler 
language mnemonic 
operation code, 
except COPY # END, 
ICTL, ISEQ, MACRO, 
and START) 8 



Symbol, variable sym- 
bol, sequence symbol 
or blank, or concate- 
nation of variable 
symbols and other char- 
acters that is equiv- 
alent to symbol 



Any combination of characters (including 
variable symbols) 
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Chart l. Statements (Part 2 of 2) 



| Instruction 

H „ 

Prototype state- 
ment 



[Name Field 



--+- 



(Operand Field 



Symbolic parameter or 

blank 



or more operands that are symbolic param- 
eters, separated by commas, followed by or 
more operands (separated by commas) in the 
form of symbolic parameter, equal sign, 
optional standard value 



Macro inn true! ion 
ii tat eraent 



or more positional operands separated by 
commas, followed by or more keyword oper- 
ands (separated by commas) in the form of 
keyword, equal sign, value 3 



Assembler language 
statement* s 



Any combination of characters (including 
variable symbols) 



Symbol, or variable 
symbol, sequence symbol 
or blank, or concate- 
nation of variable sym- 
bols and other charac- 
ters that is equivalent 
to symbol 

Symbol, or variable 
symbol, sequence symbol 
or blank, or concate- 
nation of variable sym- 
bols and other charac- 
ters that is equivalent 
to symbol 

*May be used only as part of a macro definition. 

^Variable symbols appearing in a macro instruction are replaced by their values before 
the macro instruction is processed. 

*SET symbols may be defined as subscripted SET symbols. 

^Variable symbols may not be used to generate the following mne ironic operation codes, 
nor may variable symbols be used in the name and operand fields of these instructions! 
COPY, END, ICTL, ISEQ, REPRO, and START. Variable symbols may not be used to generate 
a macro instruction mnemonic operation code. 



°The line following a REPRO statement may not contain variable symbols. 
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Chart 2. Macro Language Elements 



n 



n 



i i 
t i 

.4—4.. 



3 1 ! 



! 



"I 



I I 



I I ! 
t i i 

.4.-1-1- 



; a : 



I h 



in I 



Hi 



ill 



518 



ff 

S3 

in 



ill 



ill 



31 

VMM 



i** 



.! 



J 



9 
II 






I j> u u 



il 



* 



.1 



Si 



I 



II 



*i i 



1 



i 



1 



1 



isl 



•h 

ill 



>!i 



ill 



ft 
ill 



III 



i 



1 

1 



s i 

15- * 



>SyOOOOO 



t O • f 



ft. wj i O (U 



|3!9l!« 



8153 



& ts 
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Chart 3. Expressions 

r T . 

(Expression | Arithmetic Expressions 



(Character Expressions 



Operators are 



May contain 



r- 



Range of 
values 

I + 

May be used in 



1. 

2. 



8, 



Self-defining terras 
Length, scaling, inte- 
ger, count, and number 
attributes 

SETA and SETB symbols 
SETC symbols whose 
value is 1-8 decimal 
digits 

Symbolic parameters, if 
corresponding operand 
is self -defining term 
SSYSLIST(n), if corre- 
sponding operand is 
self-defining term 
4SYSLIST(n,m>, if cor- 
responding operand is 
self-defining term 
6SYSNDX 



♦,-,*, and / parentheses 
permitted 



-2 3 * to *2 3 * -1 



+ 



1. SETA operands 

2. Arithmetic relations 

3. Subscripted SET symbols 

4. SSYSLIST 

5. Substring notation 

6. Sublist notation 



Any combination of 
characters enclosed 
in quotation marks 
Any variable symbol 
enclosed in apostro- 
phes 

Concatenation of 
variable symbols and 
other characters 
enclosed in apostro- 
phes 

Request for type 
attribute. 



+- 



j Logical Expressions) 



Concatenation, with a 
period (.) 



to 255 characters 



1. SETC operands 3 

2. Character relations 2 



1. SETB symbols 

2. Arithmetic 
relations* 

3- Character 
relations 2 



H 



AND, OR, and NOT 

parentheses 

permitted 



_ H 



(false) or 

1 (true) 

+ _ 

1. SETB operands 

2. AIF operands 



H- 



*An arithmetic relation consists of two arithmetic expressions re 

LT, EQ, NE, GE, or LE. 



lated by operators GT, 



a A character relation consists of two character expressions related by operators GT, 
LT, EQ, NE, GE, or LE. Type attribute notation and the substring notation also may fce 
used in character relations. Maximum size of character expression that can be 
compared is 255 characters. If the two character expressions are of unequal size, the 
smaller will always compare less than the larger. 

3 Maximum of eight characters will be assigned. 
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Chart <*. Attributes 



f ._ — . — T T , 

Attribute I Notation | May be used with 



h 



Produces pertinent 
value when T ff is 



May be used in 



Type 



Symbols outside 
macro definitions; 
symbolic parameters, 
fcSYSLIST(n), and 
4SYSLIST(n,m), inside 
macro definitions 



Length 



Scaling 



Integer 



1/ 



S 9 



Count 






I 

Number 



"+ — 

N' 



Symbols outside 
macro definitions? 
symbolic parameters, 
SSYSLIST(n), and 
SSYSLIST(n,m) f inside 
macro definitions 

Symbols outside 
macro definitions; 
symbolic parameters, 
SSYSLIST(n), and 
SSYSLIST(n,m), inside 
macro definitions 

Symbols outside 
macro definitions; 
symbolic parameters, 
iSYSLIST(n), and 
tSYSLISTCn,m), inside 
macro definitions 

Symbolic parameters 
corresponding to 
macro instruction 
operands iSYSLIST(n) 
and *SYSLIST(n,m), 
inside macro defini- 
tions 

Symbolic parameters 
tSYSLIST and 
£SYSLIST(n), inside 
macro definitions 



Any letter except L, 
M,N,0,T, and U 



H,F ff G,D,£,K,P f and Z 



1. SETC operand fields 

2. Character relations 



Arithmetic expressions 



Arithmetic expressions 



— + 



H,F,G,D,E,K,P, and Z 



Arithmetic expressions 



Any letter except L 



Arithmetic expressions 



Any letter except I 



Arithmetic expressions 



~l 



Chart 5 

r ■ 

(Variabl 
| Symbol 

jsymboli 
[paramet 



Variable Symbols 



[Defined by 



(Initialized or set to j Value changed by 



(May be used in 
I 



i 



c* j Prototype | Corresponding [(Constant throughout jl. Arithmetic 

er (statement (macro instruction (definition) | expressions 

j (operand j | if operand is 

II 1 | self-defining 

II I I term 

| | j (2. Character 

(I j j expressions 



[SETA 



(ICLA or GBLA|0 
(instruction | 
I I 

I I 



JSETA instruction 



I 



i 



|1. Arithmetic 
I expressions 
| 2. Character 
I expressions 
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Variable 
Symbol 



H- 



Defined by 



Initialized or set to 



Value changed by 



T . -, 

May be used in 



SETB 



ICLB or GBLB 
instruction 



SETB instruction 



8 ETC 



1CLC or GBLC 
instruction 



Null character 
value 



SETC instruction 



\ 

4SYSNDX* 



I 



4SYSECT* 



4SYSLIST* 



Assembler 



4 

Assembler 



1. Arithmetic 
expressions 

2. Character 
expressions 

3. Logical 
expressions 

1. Arithmetic 
expressions, 
if value is 
self-defining 
term 

2. Character 
expressions 



Assembler 






4SY3LIST(n)* 

4SYSLIST 

(n.»)* 



Assembler 



4SYSSTYP 1 



iSYSPSCT* 



t SYS DATE 



4SYSTIME 



Assembler 



Assembler 



Assembler 



Macro instruction 
index 



Control section in 
which macro 
instruction appears 



Not applicable 



Corresponding 
macro instruction 
operand 



Mnemonic operation 
of statement which 
defined symbol repre- 
sented by 4SYSECT 



(Constant throughout 
definition? unique for 
each macro instruc- 
tion) 

(Constant throughout 
definition? set by 
CSECT f DSECT, and 
START) 

Not applicable 



1. Arithmetic 
expressions 

2. Character 
expressions 

Character 
expressions 



(Constant throughout 
definition) 



(Constant throughout 
definition set by 
CSECT, PSECT, COM, 
DSECT, and START) 



N f SYSLIST in 

arithmetic 

expressions 

1. Arithmetic 
expressions 
if operand is 
self-defining 
term 

2. Character 
expressions 

Character 
expressions 



Name of first PSECT 
defined within 
assembly? null 
string if no PSECT 
is defined 

Assembler date 
stamp 






Assembler 



Assembler time 
stamp 



(Constant throughout 
definition? set by 
first PSECT statement) 



(Constant throughout 
assembly) 



(Constant throughout 
assembly) 



± x 

1 Hay be used only in macro definitions. 



Character 
expressions 



1. Character 
expressions 

2. Macro 
definitions 

1. Character 
expressions 

2. Macro 
definitions 
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APPENDIX E: SAMPLE ASSEMBLY 



Given: 

1. A TABLE with 15 entries, each 16 bytes long, having this format: 

(Number of Items {switches | Address [Name j 

l . X A . _A . J 

3 bytes 1 byte 4 bytes 8 bytes 

2. A LIST of items, each 16 bytes long, having this format: 

r T . T «. T . . ^ 

(Name [Switches | Number of Items (Address | 

l, . J. . A . JL J 

8 bytes 1 byte 3 bytes H bytes 

Find : Any of the items in the list which occur in the table and put the switches, number 
of items, and address from that LIST entry into the corresponding TABLE entry. If the 
LIST item does not occur in the TABLE, turn on the first bit in the switches-byte of the 
LIST entry. 

The TABLE entries have been sorted by their name. 

EXAM TITLE 'SAMPLE ASSEMBLY' 

* THIS IS THE MACRO DEFINITION 

MACRO 

MOVE £TO,fcFROM 

DEFINE SETC SYMBOL 

LCLC iTYPE 

CHECK NUMBER OF OPERANDS 

AIF (N'fcSYSLIST NE 2KERR0R1 

CHECK TYPE ATTRIBUTES OF OPERANDS 

AIF (T'iTO NE T f SFROM).ERROR2 

AIF (T f STO EQ 9 C 9 OR T § «TO EQ - G f OR T - *TO EQ , K , ).TYPECGK 

AIF (TUTO EQ *D f OR T - STO EQ ■ E* OR T f STO EQ •H'KTYPEDEH 

AIF CT § €TO EQ *F').MOVE 

AGO .ERROR 3 
.TYPEDEH ANOP 
.* 

. * ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 
.* 

fcTYPE SETC T f £TO 
.MOVE ANOP 

* NEXT TWO STATEMENTS GENERATED FOR MOVE MACRO 
LiTYPE 2 f fcFROM 

STiTYPE 2,£TQ 

MEXIT 
.* 

.* CHECK LENGTH ATTRIBUTES OF OPERANDS 
.* 
.TYPECGK AIF CL'STO NE L'fcFROM OR L f *TO GT 256). ERRORS 

* NEXT STATEMENT GENERATED FOR MOVE MACRO 
MVC STO , fcFROM 
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MEXIT 

. * 

. * ERROR MESSAGES FOR INVALID MOVE MACRO INSTRUCTIONS 

.♦ 

.ERROR1 MNOTE 1, •IMPROPER NUMBER OF OPERANDS, NO STATEMENTS GENERATED* 

MEXIT 
•ERROR2 MNOTE 1, 'OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED 1 

MEXIT 
•ERROR3 MNOTE 1, IMPROPER OPERAND TYPES, NO STATEMENTS GENERATED' 

MEXIT 
.ERRORS MNOTE 1, •IMPROPER OPERAND LENGTHS, NC STATEMENTS GENERATED 1 

MEND 
♦ 

* MAIN ROUTINE 

♦ 

ARGSRCH CSECT PUBLIC, READONLY 

BEGIN STM R1**,R12,12(R13) SAVE CALLER 1 S REGISTERS 

LR R1«*,R13 

L R13,72(R13) SECURE PSECT COVER FOR THIS ROUTINE 

USING RSAVE,R13 

ST Rl<*,RSAVE+*4 SAVE CALLER 1 S SAVE AREA COVER 

LR R12,R15 ESTABLISH ADDRESSABIIITY OF PROGRAM 

USING BEGIN, Rl 2 AND TELL THE ASSEMBLER 

LM RS,R7,=A(LISTAREA,16,LISTEND) IOAD LIST AREA PARAMETERS 

USING LIST,R5 REGISTER 5 POINTS TO THE LIST 

MORE BAS Rl*4, SEARCH FIND LIST ENTRY IN TABLE 

TM SWITCH, NONE CHECK TO SEE IF NAME WAS FOUND 

BO NOTTHERE BRANCH IF NOT 

USING TABLE, Rl REGISTER 1 NOW POINTS TO TABLE ENTRY 

MOVE TSWITCH,LSWITCH MOVE FUNCTIONS 

Following the macro instruction MOVE, the macro definition might go through the following 
sequence: 

LCLC STYPE 

AIF (2 NE 2KERROR1 

AIF (T'TSWITCH NE T* LSWITCHl . ERROR2 

AIF (T^TSWITCH EQ , C t OR T'TSWITCH EQ 1 G" OP T f TSWITCH EQ - K § 
) .TYPECGK 
.TYPECGK AIF L'TSWITCH NE L'LSWITCH OR L^SWITCH GT 256). ERROR** 

As a result, the following instruction would be assembled into the object program in 
place of the macro instruction MOVE: 
MVC TSWITCH, LSWITCH 

MOVE TNUMBER, LNUMBER FROM LIST ENTRY 

Again, the MOVE macro instruction and how the nacro definition would process it: 
LCLC feTYPE 
AIF (2 NE 2KERROR1 
AIF (T'TNUMBER NE T*LNUMBER) . ERROR2 

AIF (T'TNUMBER EQ 'C 1 OR T"TNUMBER EQ , G t OR T*TNUMBER EQ •K 1 
> .TYPECGK 
.TYPECGK AIF (L* TNUMBER NE L f LNUMBER OR I f TNUMBER GT 256). ERRORS 

This would be substituted in the assembled code in place of the macro instruction: 

MVC TNUMBER , LNUMBER 

MOVE TADDR£SS,LADDRESS TO TABLE ENTRY 

Once again, the MOVE macro definition would prccess the macro instruction: 
LCLC &TYPE 
AIF (2 NE 2) .ERROR1 
AIF (T'TADDRESS NE T • LADDRESS) . ERROR2 
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AIF (T f TADDRESS EQ •C* OR T*TADDRESS EQ , G i OR T f TADDRESS EQ 
•K f ) .TYPECGK 

AIF T'TADDRESS EQ 'D 1 OR T'TADDRESS EQ 'E* OR T^ADDRESS EQ 
'H'KTYPEDEH 

AIF (T'TADDRESS EQ •F'l.MOVE 



.MOVE 



ANOP 



Thffw* Lineo of code would be generated v replacing the MOVE macro instruction: 

L 2 # LADDRESS 
5T 2 f TADDRESS 

The assembler continues with the following source statements: 
BXLE 
B 

NOTTHERE OI 

BXLE 



EXIT 



NONE 

* 
* 

SEARCH 



LOOP 



R5 f R6 # MORE 

EXIT 

LSWITCH,NONE 

R5,R6 f MORE 
L R13,RSAVE*** 
L R1<*,12(R13) 
OI 11CR13),! 
LM R2,R12 f 28CR13) 
BR R14 
EQU X f 80' 

BINARY SEARCH ROUTINE 



LOOP THROUGH THE LIST 

SUBROUTINE COMPLETION 

TURN ON SWITCH IN LIST ENTRY 

LOOP THROUGH THE LIST 

RETURN TO CA1LER 

RESTORE EXIT ADDRESS 

SET LINKAGE BIT 

MULTIPLE REGISTER RESTORE 

RETURN TO CAILER 



NI 

LM 

LA 

SRL 

CLC 

BH 

BCR 

SR 



BCT 

B 
HIGHER AR 

BCT 
NOTFOUND OI 

BR 



SWITCH, 255-NONE TURN OFF NOT-FOUND SWITCH 

Rl,R3,=F' 128,4,128* LOAD TABLE PARAMETERS 

Rl f TABLAREA-16(Rl) GET ADDRESS OF MIDDLE TABLE ENTRY 

R3 f l DIVIDE INCREMENT BY 2 

LNAME f TNAME COMPARE LIST ENTRY WITH TABLE ENTRY 

HIGHER BRANCH IF SHOULD BE HIGHER IN TABLE 

8,R1«4 EXIT IF FOUND 

Rl f R3 OTHERWISE IT IS LOWER IN THE TABLE 

SO SUBTRACT INCREMENT 
R2 r LOOP LOOP 4 TIMES 

NOTFOUND ARGUMENT IS NOT IN THE TABLE 

R1,R3 ADD INCREMENT 

R2,LOOP LOOP 4 TIMES 

SWITCH, NONE TURN ON NOT-FOUND SWITCH 
Rl<* EXIT 



All literals, except literal address constants, go herei 
=F , 128 f 4 f 128« 



SAP 



RSAVE 



SWITCH 

* 

DS 
TABLAREA DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 



PSECT 

ENTRY BEGIN 
DC F'16* 

dc isf^' 

DS X 



USER*S SAVE AREA 

FOUND SWITCH FOR BINARY SEARCH 



THIS IS THE TABLE 



OD 



XLS'O^CLe* ALPHA" 
XL8 , , ,CL8 , BETA i 
XLS'O 1 ,CL8 f DELTA 1 
XLS • • , CL8 • EPSILON • 
XL8 9 c v CL8'ETA f 
XL8*0*,CL8 a GAMMA' 
XLS'O'fCLS^OTA" 
XLS^^CLS 1 KAPPA* 
XLS • f , CL8 • LAMBDA • 
XL8 a 0' ,CL8 a MU a 
XL8 a a ,CL8 a NU a 
XL8 • • , CL8 • OMICRON 1 
XLS^^OL^PHI* 
XL8 a a ,CL8 a SIGMA* 
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DC XL8 f f ,CL8 , ZETA t 

* THIS IS THE LIST 

* 

LISTAREA DC CL8 • LAMBDA* , X 9 0A f ,FL3 f 29 ■ , A (BEGIN) 

DC CL8 ■ ZETA f f X • 05 ■ , FL3 - 5 f , A ( LOOP) 

DC CLS^HETA* ,X' 02 f , FL3 - 45' , A(BEGIN) 

DC CLS^AU^X'OO^FLS'O^ACl) 

DC CLS^IST" ,X , lF i .FLS'^Se 1 ,A(0) 

LISTEND DC CLS 1 ALPHA' , X 9 00 f , FL3 f l f ,A(123) 

* THESE ARE THE SYMBOLIC REGISTERS 

* 

Rl EQU 1 

R2 EQU 2 

R3 EQU 3 

R5 EQU 5 

R6 EQU 6 

R7 EQU 7 

R12 EQU 12 

R13 EQU 13 

R14 EQU HI 

R15 EQU 15 

Address constant literals go here: 

=A (LISTAREA, 16, LISTEND) 

* THIS IS THE FORMAT DEFINITION OF LIST ENTRYS 

LIST DSECT 

LNAME DS CL8 

LSWITCH DS C 

LNUMBER DS FL3 

LADDRESS DS F 
♦ 

* THIS IS THE FORMAT DEFINITION OF TABLE ENTRYS 
# 

TABLE DSECT 
TNUMBER DS FL3 
TSWITCH DS C 
TADDRESS DS F 
TNAME DS CL8 
END 
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INDEX 



CSYS, restrictions on use 56 
SSYSDATE (see date variable) 
4SYSECT 

(see current control section name) 
SSYSLIST 

(see macro instruction operand) 
CSYSNDX 

(see macro instruction index) 
SSYSPSCT 

(see prototype control section name) 
SSYSSTYP 

(see current control section type) 
4SYSTIME (time variable) 



Absolute term 9 
Address constants 41-43 

A~type 41,65 

complex relocatable expressions 41 

literals not allowed 11 

Q-type 42 

R-type 42-43,65 

S-type 42 f 65 

V-type 42 f 65 

Y-type 41-42,65 
Addressing 

caution, CCW command 46 

dummy sections 19-20 

explicit 15 

external control sections 24 

external dummy sections 22 

implied 15 

relative 17 
AGO instruction 

example 7 5 

format of 74 

inside macro definitions 75 

operand field of 75 

outside macro definitions 75 

sequence symbol in 74-75 

use of 74 
AGOB insturction (see AGO instruction) 
AIF instruction 

example of 74 

format of 74 

inside macro definitions 74 

invalid operand fields of 74 

logical expression in 74 

operand field of 74 

outside macro definitions 74 

sequence symbols in 74 

use of 73-74 

valid operand fields of 74 
AIFB instruction (see AIF instruction) 
Alignment, boundary 

CNOP instruction for 50-51 

machine instruction 25 
Ampersands in 

character expressions 70 

macro instruction operands 59 

MNOTE instruction 74-75 

symbolic parameters 54,56-57 



variable symbols 53 
ANOP instruction 

example of 75 

format of 75 

sequence symbol in 75 

use of 75 
Apostrophes, free 55-56 
Apostrophes in 

character expressions 70 

macro instruction operands 59 

MNOTE instruction 78 
Arithmetic expressions 

arithmetic relations 72 

evaluation procedure 68 

operand sublists 69 

operators allowed 68 

parenthesized terms in evaluation of 68 

SETA instruction 68-69 

SETB instruction 72-73 

Substring notation 70-71 

terms allowed 68 
Arithmetic relations 72 
Assembler instructions 

statement 30-51 

Assembler language 

comparison chart 95-100 

macro language, relation to 52 

statement format 5-6,7 

structure 7-8 
Assembler program 

basic functions 2 

output 47 
Assembly, terminating an 51 
Assembly no operation (see ANOP 

instruction) 
Asterisk 

MNOTE instruction 78 
Attributes (see also specific attributes) 

assignment to control sections 22 

how referred to 64 

inner macro instruction operands 64 

kinds of 64-67 

notations 64 

operand sublists 64 

outer macro instruction operands 64 

summary chart of 99 

use of 64-66 
A-type address constant 41 



Base registers 

address calculation 2,25 

DROP instruction 16 

loading of 15 

USING instruction 15-16 
Binary constant 38,65 
Binary self-defining term 10 
Blanks 

logical expressions 72 

macro instruction operands 59 
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CCW instruction 46 

Channel command word, defining 



46 



Character constant 37-38,65 
Character expressions 

ampersands in 70 

character relations 72 

examples of 70 

Periods and 70 

SKTH instructions 72-73 

SETC instructions 69-70 
Character relation 72 
character self-defining term 10 
Character set 7 
CNOP instruction 50-51 
Coding form 4 
COM instruction 21 

Commas, macro instruction operands 59 
Comments statements 

example of 6,58 

model statements 55 

not generated 58 
Comparison chart 9 5-100 
Complex relocatable expressions 41 
Concat enat ion 

character expressions 70,71-72 

defined 57 

examples of 57 

substring notations 71-72 
Conditional assembly elements, summary 

charts of 76 
Conditional assembly instructions 

how to write 63-76 

s uinma r y of 76 

use of 6 3 

(see also specific instructions) 
Conditional branch 

(see AIF instruction) 
Conditional branch instruction 28 
Constants 

defining 

(see DC instructions) 

summary of 9 4 

(see also specific types) 
Continuation lines 5 
Control dictionary 18 

Control section location assignment 18 
Control sections 

attributes of 22 

blank COMHON 21 

CSECT instruction 19 

defined 18 

DSECT instruction 20-21 

first control section, properties of 18 

identification of 18 

maximum location counter value 11 

PSECT instruction 21-22 

START instruction 18-19 

unnamed 19 
COPY instruction 51 
COPY statements in macro definitions 

format of 58 

model statements, contrasted 58 

operand field of 58 

use of 58 
Count attribute 

defined 66 

operand sublists 66 



use of 66 

variable symbols 66 
CSECT instruction 19 
Current control section name 
USYSECT) 82-83, 100 

affected by CSECT, DSECT, START 82-83 

example of 82-83 

use of 82-83 
Current control section type 

USYSSTYP) 83-84,98 
CXD instruction 45 



Data definition instructions 32 
channel command words 46 
constants 32-43 
storages 42-43 
Date variable USYSDATE) 85,100 
DC instruction 31-43 

constant operand subfield 36 

address-constants (see address 

constants) 
binary constant 38 
character constant 37 
decimal-constants 40-41 
fixed-point constants 38-39 
floating-point constants 39-40 
hexadecimal constant 37-38 
type codes for 34 
duplication factor operand subfield 33 
operand subfield modifiers 34 
type operand subfield 33-34 

bit length specification 34-35 
exponent modifier 36 
length modifier 34 
scale modifier 35 
Decimal constants 40-41,65 
length modifier 40-41 
length, maximum 40 
packed 40 
zoned 40 
Decimal field, integer attribute of 65 
Decimal self -defining terms 10 
Defining constants 

(see DC instruction) 
Defining storage 

(see DC instruction, DS instruction) 
Defining symbols 9-11 

Dimension, subscripted SET symbols 81 
Double-shift instruction 25 
DROP instruction 16 
DS instruction 43-44 
defining areas 44 
forcing alignment 44 
DSECT instruction 20 

Dummy section location assignment 20 
Duplication factor 33,35 

defining fields of an area 44 
forcing alignment 44 
DXD instruc 44-45 



Effective address, length 26 

EJECT instruction 47 

END instruction 51 

ENTRY instruction 23 

Entry point symbol, identification of 23 

EQU instruction 31-32 
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Equal signs, as macro instruction 

operands 59 
Error message 

(see MNOTE instruction) 
Explicit addressing 15 

length 26-27 
Exponent modifiers 36 
Expressions 13-14 

absolute 13 

evaluation 13 

relocatable 1** 

summary chart of 98 
Extended mnemonic codes 

RR format 30 

RX format 29 
External control section, addressing of 24 
External dummy section 

allocation for 22 

definition of 22 

description of 22 
External symbol, identification of 23-24 
EXTRN instruction 23-24 



First control section 18 
Fixed-point constants 35-36,38-39,65 

format 39 

positioning of 38 

scaling 35 

values, minimum and maximum 38 
Fixed-point field, integer attribute of 65 
Floating-point constants 39-40,65 

alignment 40 

format 40 

scale modifiers 40 
Floating-point field, integer attribute 

of 65 
Format control, input 48 



GBLA instruction 

tor mat of 79 

inside macro definitions 79-80 

outside macro definitions 79-80 

use of 79-81 
GBLB instruction 

format of 79 

inside macro definitions 79-80 

outside macro definitions 79-80 

use of 79-81 
GBLC instruction 

format of 79 

inside macro definitions 79-80 

outside macro definitions 79-80 

use of 79-81 
General register 0, base register usage 16 
Global SET symbols 

defining 79 

examples of 79-81 

local SET symbols, compared 79 

using 79 
Global system variable symbols 78-82 

definition of 78 

types of 78 
Global variable symbols 

types of 78 

(see also global SET symbols, 
subscripted SET symbols) 



Hexadecimal constants 37-38,65 
Hexadecimal self -defining terms 10 



(see integer attribute) 
ICTL instruction 48 
Identification-sequence field 6 
Identify dummy section 22 
Identifying blank common control 

section 21 
Implied addressing 15-16 

length 26 
Implied length specification 26-27 
Inner macro instruction 61-62 

defined 61 

example of 61 

symbolic parameters in 61-62 
Instruction alignment 25 
Integer attribute 65-66 

decimal fields 65 

defined 65 

examples of 65 

fixed-point fields 65 

floating-point fields 65 

notation 65 

restrictions on use 66 

symbols 65-66 

use of 65-66 
ISEQ instruction 49 



K § 

(see count attribute) 
Keyboard statement formats 

boundaries 5 

continuation lines 5 
Keyword 

defined 85 

keyword macro- instruction 85-87 

symbolic parameter and 86 
Keyword, inner macro instructions used 

in 87 
Keyword macro definition 

positional macro definitions, 
compared 85-86 

use 86 
Keyword macro instruction 

example of 86-87 

format of 86 

keywords in 86 

operand subiists in 87 

operands 

invalid examples 86-87 
valid examples 86 
Keyword prototype statement 86 

example of 86 

format of 86 

operands 86 

invalid examples 86 
valid examples 86 

standard values 86 



(see length attribute) 
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LCLA instruction 

format of 67 

UGe of 67 
LCLB instruction 

format of 67 

use of 67 
LCLC instruction 

format of 67 

use of 67 
Length attribute 

defined 6*> 

examples 65 

notation 65 

restrictions on use 65 

symbols 12,65 

use of 65-66 
Length modifier 35-36 

bit-length specification 34 

length subfield 34 
Lengths explicit and implied 26-27 
Linkage symbols 

(see also ENTRY instruction, EXTERNAL 
instruction) 

entry point symbol 23 

external symbol 23-24 
Listing control instructions 46-48 
Listing, spacing 47 
Literal pools 12,49 
Literals 11-12 

character 26 

DC instruction, used in 12 

duplicate 50 

format 12 

literal pool, beginning 49-50 

literal pools, multiple 12 
Local SET symbols 

defining 79 

examples of 79-81 

global SET symbols, compared 79 

using 79-81 
Local system variable symbols 

(see also local SET symbols) 

Csee also subscripted SET symbols) 

types of 78 
Location countei 10-11,33,36,45,50 

maximum value 11 

references to 11 
Logical expressions 

AiF instructions 73-74 

arithmetic relations 72 

blanks in 72 

character relation 72 

evaluation of 73 

invalid examples of 73 

logical operators in 72 

parenthesized terms in 
evaluation of 73 
examples of 73 

relation operators in 72 

SETB instructions 72 

terms allowed in 72 

valid examples of 73 
LTORG instruction 49 



Machine-instruction examples and format 
RR 25,27 
RS 26,28 



RX 26,27 
SI 26,28 
SS 26,28 

Machine-instruction mnemonic codes 27 

Machine- instruct ions 

alignment and checking 25 

literals, limits on 11 

mnemonic operation codes 27-28 

operand fields and subfieids 25-26 

symbolic operand formats 25 
MACRO 

format of 54 

use 54 
Macro language 

extended features of 74-88 

relation to assembler language 52 

summary 9 5-100 
Macro definition 

defined 52 

example of 55-56 

how to prepare 54-58 

keyword 52 

Csee also keyword macro definition) 

mixed-mode 52 

(see also mixed-mode macro 
definition) 

placement in source program 54 

use 52 
Macro definition exit 

Csee MEXIT instruction) 
Macro definition header statement 

Csee MACRO) 
Macro definition trailer statement 

Csee MEND) 
Macro instruction 

defined 52 

example of 61 

format of 59 

how to write 59-61 

levels of 62 

mnemonic operation code 59 

name field of 59 

omitted operands 60 
example 60 

operand field of 59-60 

operand sublists 60-61 

operands 

ampersands 59 
blanks 59 
commas 59 
equal signs 59 
paired apostrophes 59 
paired parentheses 59 

operation field of 59 

statement format 60 

types of 52 

used as model statement 61 
Macro instruction index USYSNDX) 82,100 

AIF instruction 82 

arithmetic expressions 82 

character relation 82 

example 82 

SETA instruction 82 

SETB instruction 82 

SETC instruction 82 

use of 82 
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Macro instruction operand 
USYSLIST) 84,100 

attributes of 84 

use of 8** 

(see also symbolic parameters) 
Macro instruction prototype 

statement 52,54 
Macro instruction statement 

Cuee macro instruction) 
MEND 

format of 54 

MEXIT instruction, contrasted 77 

use of 54,77 
MEXIT instruction 

example of 77 

format of 77 

MEND, contrasted 77 

use of 77 
Mixed-mode macro definitions 

positional macro definitions, 
contrasted 87-88 

use 88 
Mixed-mode macro instruction 87-88 

example of 88 

format of 88 

operand field of 88 
Mixed-mode prototype statement 

example of 88 

format of 88 

operands of 88 
Mnemonic operation codes 27 

extended 28-30 

machine instruction 27 

RR format 27 

RS format 28 

RX format 27 

SI format 28 

SS format 28 
MNOTE instruction 

ampersands in 77-78 

apostrophes in 77-78 

asterisk in 78 

error message 77-78 

example of 77-78 

operand field of 77-78 

severity code 77-78 

use of 77-78 
Model statements 

comments field of 55 

comments statements 55 

defined 52,55 

name field of 55 

operand field of 55 

operation field of 55 

use of 55 



Operand sublist 

alternate statement format 60-61 

defined 60-61 

example of 60-61 

use of 60-61 
Operands 

entries 6 

fields 25-26 

subfields 25-26 

symbolic 25-26 
Operating system 3 
ORG instruction 49 
Outer macro instruction defined 



62 



59 
59 



Paired apostrophes 
Paired parentheses 
Parentheses in 

arithmetic expressions 70 

logical expressions 69 

macro instruction operands 57 

operand fields and subfields 25-26 
Period in 

character expressions 67 

comments statements 58 

concatenation 57 

sequence symbols 64 
Positional macro definition 

(see macro definition) 
Positional macro instruction 

(see macro instruction) 
Previously defined symbols 9 
PRINT instruction 47 
Program control instructions 
Program listings 2 
Program sectioning and linking 
Prototype control section name 

USYSPSCT) 84,100 
Prototype statement 

example of 54 

format of 54 

keyword 

(see keyword prototype statement) 

mixed-mode 

Csee mixed-mode prototype statement) 

name field of 54 

operand field of 55 

operation field of 54 

statement format 54-55 

symbolic parameters in 54,56-57 

use of 54-55 
PSECT instruction 21-22 
PUNCH instruction 49 



Q-type address constant 42 



45-48 



17-18 



N f 

(see number attribute) 
Name entries 6 
Number attribute 

defined 66 

example of 66 

notation 66 

operand sublist 66 



Relative addressing 17 
Relocatability 2,7 

attributes 14 

program, general register 16 
Relocatable expressions 14 

in USING instructions 15-16 
Relocatable terms 9 

in relocatable expressions 14 

pairing of 14 
REPRO instruction 49 
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RK extended mnemonic codes 30 

RR machine-instruction format 25,27 

length attribute 2 5 

symbolic operands 25 
RS machine-instruction format 25,28 

address specification 26 

length attribute 25 

symbolic operands 25 
K-type address constant 42-43 
RX extended mnemonic codes 29 
RX machine-instruction format 25,27 

address specification 26 

length attribute 25 

symbolic operands 25 



S" 

(see scaling attribute) 
Sample assembly 101-104 
Scale modifier 35-36 

fixed- point constants 35-36 

floating-point constant 36 
Scaling attribute 

decimal fields 65 

defined 65 

examples of 65 

fixed-point fields 65 

floating-point fields 65 

notation 65 

restrictions on use 65-66 

symbols 65 

use of 65-66 
Self-defining terms 9-10 

Csee also specific terms) 
Sequence checking 49 
Sequence symbols 

AGO instruction 74-75 

AIF instruction 73-74 

AS*0P instruction 75 

how to write 67 

invalid examples of 67 

use of 67 

valid examples of 67 
Set symbols 

Csee also local SET symbols) 

I see also global SET symbols) 

Csee also subscripted SET symbols) 

assigning values to 6 3 

defining 63 

symbolic parameters, contrasted 63 

use 63-64 
SET variable 78 
SETA instruction 

examples of 68 

format of 68 

operand field of 68 

evaluation procedure 68 
operators allowed 68 
parenthesized terms 68 
terms allowed 68 
valid examples of 68 

operand sublist 69 
example 69 
SETA symbol 

assigning values to 69 

defining 63 

SETA instruction 68 

SETC instruction 69 



using 68-69 
SETB instruction 
example of 73 
format of 72 
logical expression in 72 

arithmetic relations 72 

blanks in 72 

character relations 72 

evaluation of 73 

operators allowed 72 

terms allowed 72 
operand field of 73 

invalid examples of 73 

valid examples of 73 
SETB symbol 

AIF instruction 73-74 
assigning values to 63 
defining 63 
SETA instruction 73 
SETB instruction 73 
SETC instruction 73 
using 73 
SETC instruction 
apostrophes 70 
character expressions in 70 

ampersands 70 

periods 70 
concatenation in 

character expressions 71-72 

substring notations 71-72 
examples of 70 
format of 69 
operand field of 69 
substring notations in 70-71 

arithmetic expressions in 70 

character expressions in 70 

invalid examples of 71 

valid examples of 71 
type attribute in 70 
SETC symbol 

assigning values to 71 
defining 63 
SETA instruction 70 
using 71-72 
Severity code in MMOTE instruction 77 
SI machine-instruction format 25,28 
address specification 26 
length attribute 25 
symbolic operands 25 
SPACE instruction 47 
SS machine-instruction format ' 25,28 
address specification 26 
length attribute 25 
length field 26 
symbolic operands 25 
Standard value 

attributes of 87 
keyword prototype statement 86 
START instruction 

positioning of 19 
unnamed control sections 18-19 
Statements 4-7 
boundaries 4 
examples 6 

macro instructions 53 
prototype 54 
Storage, defining 

(see DS instruction) 
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S-type address constant 42 
Sublist 

(see operand sublist) 
Subscripted SET symbols 

defining 81 

dimension of 81 

examples 81 

how to write 81-82 

invalid examples of 81 

subscript of 81 

using 81-82 

valid examples of 81 
Substring notation 

arithmetic expressions in 70 

character expression in 70 

defined 70 

how to write 70-71 

invalid example of 71 

SETA instruction 70 

SETC instruction 70 

valid examples of 71 
Symbol definition, EQU instruction 

for 31-32 
Symbolic linkages 22-24 
Symbolic operand formats 25-27 
Symbolic parameter 

concatenation of 57 

defined 56 

how to write 56 

invalid examples of 56 

replaced by 56-57 

valid example of 56 
Symbols 

defining 9-11 

length attributes 9,11 

length, maximum 9 

previously defined 9 

restrictions 9 
System macro instructions defined 
System variable symbols 82-83 



Csee also specific system variable 
symbols) 
assigned values by assembler 82-83 
defined 82 



T , 

Csee type attribute) 
Terms 

expressions composed of 9 

in parentheses 12-13 

pairing of 14 
Time variable (CSYSTIME) 85,100 
TITLE instruction 46-47 
Type attribute 

defined 64-65 

literals 65 

macro instruction operands 65 

notation 65 

symbols 65 

use 65 



Unconditional branch 

(see AGO instruction) 
Unconditional branch instruction 
Unnamed control section 19 
USING instruction 15-16,17 
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53 



Variable symbols 

assigning values to 53 

defined 53 

how to write 53 

types of 53 

use 53 

(see also specific variable symbols) 
Virtual storage concept 1-2 
V-type address constant 42 
V-type address constant 41-42 
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